Select Code to Download

<code>
# code => [ 'label', 'order' ]
...
     683 => [ 'babe', '4' ],
     001 => [ 'old fart', '5' ]
);

@types_sorted = sort { $user_types{$a}[1] <=>  $user_types{$b}[1] } ke
+ys %user_types;

for $i (0 .. $#types_sorted) {
   make options list;
}