11 lines
123 B
Perl
11 lines
123 B
Perl
|
sub hello {
|
||
|
|
my $name = shift;
|
||
|
|
print "Hello, $name!\n";
|
||
|
|
}
|
||
|
|
|
||
|
|
sub add {
|
||
|
|
my ($a, $b) = @_;
|
||
|
|
return $a + $b;
|
||
|
|
}
|
||
|
|
1;
|