Help for this page

Select Code to Download


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