mapcar { push @{$facdata{$_[0])}, $_[1] } \@facfields, \@facrow;
Is that more what you wanted? If you don't want to use mapcar (type mapcar in the PM Search box to find it), then you can code that like:
for( 0..$#facfields ) { push @{ $facdata{$facfields[$_]} }, $facrow[$_]; } # or push @{ $facdata{$_} }, shift @facrow for @facfields;
Hope that helps.
- tye (but my friends call me "Tye")In reply to (tye)Re: push
by tye
in thread push
by malaga
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |