print ((sort { $b <=> $a } grep defined, @_)[0]), " - was a max defined value\n";

##</code><code>##

print +(sort { $b <=> $a } grep defined, @_)[0], " - was a max defined value\n";