Re: [Perl-unix-users] help needed with array references
push(@newarray, $aryref); foreach my $aryref (@newarray) { foreach my $elem (@{$aryref}) { print "$elem\n"; } } or print $newarray[0]->[1], "\n"; --- [EMAIL PROTECTED] wrote: > while ($ary = $sth->fetchrow_arrayref) { > push @newary, @{$ary}; > } > $sth->finish; >
[Perl-unix-users] help needed with array references
while ($ary = $sth->fetchrow_arrayref) { push @newary, @{$ary}; } $sth->finish; if ($debugmode eq "on") { $output->insert('end', $newary[0][0]); # (1) this will cause "Cannot use string as an ARRAY ref." foreach my $line (@newary) {