# fizzbuzz
# Multiples of three output fizz, multiple sof five output buzz, and multiples of both output fizzbuzz

for ^100 {
  print $_ + 1 ~ ":"; 
  print "Fizz" if ($_ + 1) %% 3;
  print "Buzz" if ($_ + 1) %% 5;
  print "\n";
}