programming-examples/perl/Subroutine/Is a parameter defined.pl
2019-11-15 12:59:38 +01:00

11 lines
176 B
Perl

sub addem
{
($value1, $value2) = @_;
if (!defined($value2)) {
$value2 = 1
};
print "$value1 + $value2 = " . ($value1 + $value2);
}
addem(2);