$ perl -Mstrict -wle 'print qw((^2005..2008)(01..12)) ' (^2005..2008)(01..12) $