> print(( ( "." x $_ ) =~ /^(.{3})*$/ && "Fizz" )
>     . ( ( "." x $_ ) =~ /^(.{5})*$/ && "Buzz" ) || $_ )
>     for 1 .. 100

何言語ですか？(;´Д`)

参考：2007/12/30(日)19時36分41秒