Help for this page
push @biggest, [$name, $size]; @biggest = sort {$a->[1] <=> $b->[1]} @biggest; shift @biggest if @biggest > $n; # remove smallest