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