Perl6: say "Fizz"x$_%%(2+1)~"Buzz"x$_%%(4+1)||$_ for 1..100

from here - https://github.com/rsha256/shortest-fizzbuzz/blob/master/Per...