Chap Harrison wrote:
On Apr 1, 2009, at 2:04 PM, Chas. Owens wrote:
If I understand you correctly, you want a map[1] that feeds a join[2]:
#!/usr/bin/perl
use strict;
use warnings;
my @aref = (
[qw/a1 b1 c1/],
[qw/a2 b2 c2/],
[qw/a3 b3 c3/],
);
print join(", ", map { "($_->[0]=
On Thu, Apr 2, 2009 at 01:54, Chap Harrison wrote:
snip
> I was getting tangled up with the complexities of addressing the various
> things inside the "table".
snip
Yeah, if I try to think about AoA[1]s as a table I inevitably screw it
up. The fact that the row index comes before column index al
On Apr 1, 2009, at 2:04 PM, Chas. Owens wrote:
If I understand you correctly, you want a map[1] that feeds a join[2]:
#!/usr/bin/perl
use strict;
use warnings;
my @aref = (
[qw/a1 b1 c1/],
[qw/a2 b2 c2/],
[qw/a3 b3 c3/],
);
print join(", ", map { "($_->[0]=$_->[2])"
On Wed, Apr 1, 2009 at 14:23, Chap Harrison wrote:
> Hi,
>
> Using the DBI module, I've retrieved a row set from a database. I have an
> $ary_ref with which to access the data.
>
> As I understand it, $ary_ref is:
> a reference to ...
> an array of references to ...
> fixed-length arrays containi
