Help for this page

Select Code to Download

Select or download this

sub by_id {
    # extract numbers
...
for my $f (sort by_id @files) {
    say $f;
}