@b=("::");for(1..<>){@n=();for(@b){push@n,$_ x3}for(@b){push@n,$_." "x length($_).$_}for(@b){push@n,$_ x3}@b=@n;}print $_.$/for@b
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page