#!perl -na
$a[$l++].=$_;$a[$l+$_-1].="$F[$_] "for 1..$#F}{print@a