Anonymous user
Optional parameters: Difference between revisions
→{{header|Perl}}: add Perl 6 entry
(→{{header|Perl}}: add Perl 6 entry) |
|||
Line 803:
=={{header|Perl}}==
Perl 5 has no formal parameters, so all function arguments must be processed in the function body.
This function expects its first argument to be a reference to an array of arrays. It interprets any remaining arguments as a hash of optional parameters.
Line 825:
{printf "%-5s", $_;}
print "\n";}</lang>
=={{header|Perl 6}}==
<lang perl6>method sorttable(:$column = 0, :$reverse, :&ordering = &cmp) {
my @result = self»[$column].sort: &ordering;
return $reverse ?? @result.reverse !! @result;
}</lang>
=={{header|PicoLisp}}==
|