Select Code to Download

$y = 0;
for $key (sort { $hash{$b} <=> $hash{$a} || length($b) <=> length($a) 
+} keys %sizehash) {
...
        $y++;
    }
}

Total files: 104644
Largest file: c:\/My Virtual Machines/Gentoo/Gentoo
...
344,746,496: c:\/My Documents/My Virtual Machines/Windows95/Windows 98
+.vmdk
176,308,736: c:\/My Documents/My Virtual Machines/Windows95/Windows95.
+vmdk
524,288,000: c:\/Data/Personal.vol