Define subroutine then use it
sub addem { ($value1, $value2) = @_; $value1 + $value2; } $value = addem 2, 2; print "2 + 2 = $value\n";