Как-то так: use date::manip for ($date = parsedate('2007-01-01'); $date < parsedate('2008-01-01'); $date += 86400) { say formatdate ("%Y-%m-%d") <-- таких функций не одна } -- Andrew Shitov ______________________________________________________________________ andy на shitov.ru | http://shitov.ru