9 lines
188 B
Raku
9 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('. ');
|