use List::Util qw[min max]; $m = max(1,2); [download]
In reply to Re^4: Finding the max()/min() by dvo in thread Finding the max()/min() by dragonchild