http://qs1969.pair.com?node_id=543989

jesuashok has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks,

The perl program below should print 3 identical lines,

#! /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);
Output:
xyz zzz xyz
why does it happen. I run this program in unix ksh.

"Keep pouring your ideas"

2006-10-07 Unapproved by planetscape once evidence of habitual plagiarism uncovered.