my @foo = map { ; 1, 2 } 3, 4; print "@foo\n"; __END__ 1 2 1 2