Select Code to Download

foreach (reverse sort {$one{$a} cmp $one{$b} || $a cmp $b} (keys %one)
+)

4
3
2
14
13

14
13
4
3
2