<>=~$";$"x=$`*2-3;print' 'x$q."@a "|substr"@a",$q++for@a=($')x$`
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page