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