perl: print "." instead of "0"; uncommented clearscreen
perl: added simple "generate" function, which creates new piece in totally random place, just to feel the game