I agree, none of those are pretty. In Perl 6 you can also use either of:

    zipWith {[$^a, $^b]} @foo, @bar;
[download]

or

    zipWith -> $a, $b {[$a,$b]} @foo, @bar;
[download]

But then, your entire OP reads a bit like an ad for Perl 6... :-)