Help for this page
%hash{$path}= { Date => $date, Size => $size };
my @sort = sort {$hash{$a}->{"Size"} cmp $hash{$b}->{"Size"}} keys %ha +sh; for each $file (@path) { ... break; } }