Untitled

my $fizzes   := ("", "", "fizz") xx *;
my $buzzes   := ("", "", "", "", "buzz") xx *;
my $words    := flat($fizzes) Z~ flat($buzzes);
my $numbers  := 1 ... *;
my $fizzbuzz := zip($words, $numbers, :with(&max));

say $fizzbuzz[^15];