DozzFizzBuzz by angel

$"++,/./||($j+=$k=1,map{$k++%$"or$_.=(Q,D,F,B,M,P)[$j%6].(a,o,i,u,e)[$j%5].zz}@x),print for@x=(1,($/)x99)

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page