my $start="$y-$m-01";my $first="$y-$m-01";
my $datestr = UnixDate(ParseDate($start), " %b");my $last_day=ParseDate("last day in $datestr");

print "$first,$start,$end\n";
my @t_dates = &ParseRecur("0:0:0:1:0:0:0",$first,$start,$end);
print  "@t_dates";
print "\n------\n";

##</code><code>##

2011-01-01,2011-01-01,2011-01-31
2011010100:00:00 2011010200:00:00 2011010300:00:00 2011010400:00:00 2011010500:00:00 2011010600:00:00 2011010700:00:00 2011010800:00:00 2011010900:00:00 2011011000:00:00 2011011100:00:00 2011011200:00:00 2011011300:00:00 2011011400:00:00 2011011500:00:00 2011011600:00:00 2011011700:00:00 2011011800:00:00 2011011900:00:00 2011012000:00:00 2011012100:00:00 2011012200:00:00 2011012300:00:00 2011012400:00:00 2011012500:00:00 2011012600:00:00 2011012700:00:00 2011012800:00:00 2011012900:00:00 2011013000:00:00 2011013100:00:00
------
2011-02-01,2011-02-01,2011-02-28
2011020100:00:00 2011020200:00:00 2011020300:00:00 2011020400:00:00 2011020500:00:00 2011020600:00:00 2011020700:00:00 2011020800:00:00 2011020900:00:00 2011021000:00:00 2011021100:00:00 2011021200:00:00 2011021300:00:00 2011021400:00:00 2011021500:00:00 2011021600:00:00 2011021700:00:00 2011021800:00:00 2011021900:00:00 2011022000:00:00 2011022100:00:00 2011022200:00:00 2011022300:00:00 2011022400:00:00 2011022500:00:00 2011022600:00:00 2011022700:00:00 2011022800:00:00
------
2011-03-01,2011-03-01,2011-03-31
2011030100:00:00 2011030200:00:00 2011030300:00:00 2011030400:00:00 2011030500:00:00 2011030600:00:00 2011030700:00:00 2011030800:00:00 2011030900:00:00 2011031000:00:00 2011031100:00:00 2011031200:00:00 2011031300:00:00 2011031400:00:00 2011031500:00:00 2011031600:00:00 2011031700:00:00 2011031800:00:00 2011031900:00:00 2011032000:00:00 2011032100:00:00 2011032200:00:00 2011032300:00:00 2011032400:00:00 2011032500:00:00 2011032600:00:00 2011032700:00:00 2011032801:00:00 2011032901:00:00 2011033001:00:00
------
2011-04-01,2011-04-01,2011-04-30
2011040100:00:00 2011040200:00:00 2011040300:00:00 2011040400:00:00 2011040500:00:00 2011040600:00:00 2011040700:00:00 2011040800:00:00 2011040900:00:00 2011041000:00:00 2011041100:00:00 2011041200:00:00 2011041300:00:00 2011041400:00:00 2011041500:00:00 2011041600:00:00 2011041700:00:00 2011041800:00:00 2011041900:00:00 2011042000:00:00 2011042100:00:00 2011042200:00:00 2011042300:00:00 2011042400:00:00 2011042500:00:00 2011042600:00:00 2011042700:00:00 2011042800:00:00 2011042900:00:00 2011043000:00:00
------
2011-05-01,2011-05-01,2011-05-31
2011050100:00:00 2011050200:00:00 2011050300:00:00 2011050400:00:00 2011050500:00:00 2011050600:00:00 2011050700:00:00 2011050800:00:00 2011050900:00:00 2011051000:00:00 2011051100:00:00 2011051200:00:00 2011051300:00:00 2011051400:00:00 2011051500:00:00 2011051600:00:00 2011051700:00:00 2011051800:00:00 2011051900:00:00 2011052000:00:00 2011052100:00:00 2011052200:00:00 2011052300:00:00 2011052400:00:00 2011052500:00:00 2011052600:00:00 2011052700:00:00 2011052800:00:00 2011052900:00:00 2011053000:00:00 2011053100:00:00
------
2011-06-01,2011-06-01,2011-06-30
2011060100:00:00 2011060200:00:00 2011060300:00:00 2011060400:00:00 2011060500:00:00 2011060600:00:00 2011060700:00:00 2011060800:00:00 2011060900:00:00 2011061000:00:00 2011061100:00:00 2011061200:00:00 2011061300:00:00 2011061400:00:00 2011061500:00:00 2011061600:00:00 2011061700:00:00 2011061800:00:00 2011061900:00:00 2011062000:00:00 2011062100:00:00 2011062200:00:00 2011062300:00:00 2011062400:00:00 2011062500:00:00 2011062600:00:00 2011062700:00:00 2011062800:00:00 2011062900:00:00 2011063000:00:00
------