Hi, you are debugging with:
$field1 = $row->{field1}; $field2 = $row->{field2}; $field3 = $row->{f +ield3}; print "Row id is $field1, field 2 is $field2, field 3 is $field3\n";
You might like sprintf, you can skip all that assigning to temporary variables just to debug an interpolated string:
print sprintf "Row id is %s, field 2 is %s, field 3 is %s\n", @{$row}{ +qw/field1 field2 field3/};
Hope this helps!
In reply to Re: Array of Hashes
by 1nickt
in thread Array of Hashes
by Ken_M
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |