Help for this page

Select Code to Download

Select or download this

use strict "vars";

...
foreach $ja (sort{$a cmp $b} @b) {
    print "$ja\n";
}

Select or download this
```
cmp sort of @a

...
E0855
E0975
E1180
```