6 lines
63 B
Perl
6 lines
63 B
Perl
|
sub multiply( $$ )
|
||
|
|
{
|
||
|
|
my ($a, $b) = @_;
|
||
|
|
return $a * $b;
|
||
|
|
}
|