Jenda Krynicky wrote:
From: John Ackley <[EMAIL PROTECTED]>there is more than one way to do it is there an easier way to do this map: my $index = 0; while( my @a = $SQL->fetchrow_array) { my %a = map { $fieldnames[$index++] => $_ } @a; print "$_ => $a{$_}\n" for (keys %a); }Any reason why you are not using fetchrow_hashref()?
thanks! yes, I did not RTFM -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
