my $max = pop(@vals = sort(@vals));