RosettaCodeData/Task/Variadic-function/Perl/variadic-function-6.pl

7 lines
151 B
Perl
Raw Permalink Normal View History

2015-02-20 00:35:01 -05:00
sub print_many ($first, $second, @rest) {
say "First: $first\n"
."Second: $second\n"
."And the rest: "
. join("\n", @rest);
}