Select Code to Download

my $max = pop @{@vals=sort @vals; \@vals};

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