RosettaCodeData/Task/Nested-function/Raku/nested-function.raku

10 lines
188 B
Raku

sub make-List ($separator = ') '){
my $count = 1;
sub make-Item ($item) { "{$count++}$separator$item" }
join "\n", <first second third>».&make-Item;
}
put make-List('. ');