sub fizzBuzz {
#23456789 123456789 123456789 123456789 123456789 12
print+($_%3?"":Fizz).($_%5?"":Buzz)||$_,$/for 1..100
}