$i=<>; $a=" ##"x$i; $b="#"." #"x($i-1); $_=" a b b b b b a"; s/a/$a/g; s/b/$b/g; print;
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page