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