sub zero { return 0; } $x = zero(SOME_VERY_LONG_COMPLICATED_EXPRESSION);