Tic Tac Toe by dcutter

@a=(($a='   |   |   
').($b='---+---+---
')."$a$b$a
")=~/./gs;/^./,$a[$']=$&,print@a for X1,O29,X57,O9,X49,O53,X25

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

download

return to the top page