Help for this page
Select Code to Download
Select
or
download this
my @foobar= map { ($bar[$_],$foo[$_]) } 0..$#bar;
Select
or
download this
use mapcar; my @foobar= mapcar { @_ } \@bar, \@foo;