Select Code to Download

#!/usr/local/bin/perl -w
# I assume @dates contains a list of formatted date values
...
# Return that sorted list
return(@sorteddates);