in reply to Re^2: max of N numbers?
in thread max of N numbers?

Sorry, I got lazy and didn't complete the code. You can get rid of the ==s by simply subtracting the rhs from the left 
if $x == $y;
if $x - $y;

[download]

In Section Seekers of Perl Wisdom