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];