RosettaCodeData/Task/Interactive-programming/Perl-6/interactive-programming.pl6
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

6 lines
112 B
Raku

$ rakudo/perl6
> sub f($str1,$str2,$sep) { $str1~$sep x 2~$str2 };
f
> f("Rosetta","Code",":");
Rosetta::Code
>