Select Code to Download

#!/usr/local/bin/perl

...
}

print Dumper \@sorted_by_year;

$VAR1 = [
  {
...
    ]
  }
];