<?if(($b=strlen($a=fgets(STDIN))-1)>6){$a='long';$b=4;}for(;$i<1<<$b;$i++,$j=-print' ')for(;++$j<$b;)if($i/(1<<($b-$j-1))%2)echo$a[$j];
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page