RosettaCodeData/Task/Named-parameters/Perl-6/named-parameters-2.pl6
2018-06-22 20:57:24 +00:00

11 lines
256 B
Raku

sub funkshun ($a, $b?, :$c = 15, :$d, *@e, *%f) {
say "$a $b $c $d";
say join ' ', @e;
say join ' ', keys %f;
}
# this particularly thorny call:
funkshun
'Alfa', k1 => 'v1', c => 'Charlie', 'Bravo', 'e1',
d => 'Delta', 'e2', k2 => 'v2';