2007/12/30 (日) 19:36:41        [qwerty]
print(( ( "." x $_ ) =~ /^(.{3})*$/ && "Fizz" )
    . ( ( "." x $_ ) =~ /^(.{5})*$/ && "Buzz" ) || $_ )
    for 1 .. 100