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