my @valid_dates = #timegm( $sec, $min, $hour, $mday, $mon, $year ) ([timegm (0,0,16,4,10, 2014), timegm (0,0,22,5,10,2014)], #2014 [timegm (0,0,16,5,10, 2013), timegm (0,0,22,6,10,2013)], #2013 [timegm (0,0,16,6,10, 2012), timegm (0,0,22,7,10,2012)],)#2012 ;