BEGIN{open A,">>$0";syswrite A,(<{,Fizz}>.<{,,,Buzz}>||$_).$/for 2..99;*STDERR=$~}1