RosettaCodeData/Task/Function-definition/Perl/function-definition-2.pl

sub multiply { $_[0] * $_[1] }