foreach $number (sort keys %count) {