#!/usr/bin/env /friends/.rakudobrew/bin/perl6 sub fizz-buzz($n) { my &fizz = { $^n % 3 ?? '' !! 'Fizz' }; my &buzz = { $^n % 5 ?? '' !! 'Buzz' }; fizz($n) ~ buzz($n) || $n; } my @int = 0..*; say fizz-buzz(@int[15]);