#!perl -aplF $\='';print;print"$F[$_-1] $F[-$_]",$"x(!!$_*@F-1)for 1-@F..0;$_=reverse
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page