The perl program below should print 3 identical lines,
Output:#! /usr/perl -l sub f1 { my ($f) = @_; my @z = ("$f"); for my $d (@z) {return $d} } sub f2 { my ($f) = @_; for my $d ("$f") {return $d} } sub f3 { for my $d (@_) {return $d} } print map {f1($_)} qw(x y z); print map {f2($_)} qw(x y z); print map {f3($_)} qw(x y z);
why does it happen. I run this program in unix ksh.xyz zzz xyz
2006-10-07 Unapproved by planetscape once evidence of habitual plagiarism uncovered.
In reply to "map" sometimes uses only the last mapped value by jesuashok
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |