perl -E 'say+(Fizz)[$_%3].(Buzz)[$_%5]||$_ for 1..30'