Help for this page

Select Code to Download


  1. or download this
    my @foobar= map { ($bar[$_],$foo[$_]) } 0..$#bar;
  2. or download this
    use mapcar;
    my @foobar= mapcar { @_ } \@bar, \@foo;