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

5 lines
77 B
Perl

use experimental 'signatures';
sub multiply ($x, $y) {
return $x * $y;
}