Select Code to Download

my @sorted = sort by_year_and_month @files;

...
sub year 
    substr shift, 2, 2; #used to be 2, 3 but see above!
}