Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
   @list;

print qq{$_\n} for @sorted;

Select or download this
```
a1_1
a1_2
...
a10_1
a10_2
a10_10
```