Select Code to Download

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

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