my @topTen = ();
while( moreFiles() )
{
   push @topTen, some_munged_key_using_file_size_and_name();
   @topTen = (reverse sort @topTen)[0..9];
}