my @combined= mapcar {@_} \@list1,\@list2;
[download]

See mapcar -- map for more than one list for a version of mapcar in Perl.

        - tye (but my friends call me "Tye")