#!/usr/local/bin/perl -l
print((Fizz)[$_%3].(Buzz)[$_%5])||$_ for 1..30