$ cat 641322.pl use strict; use warnings; use DateTime; my $dt1 = DateTime->from_epoch( epoch => 1135202400 ); my $dt2 = DateTime->from_epoch( epoch => 1188252000 ); $dt1->add( hours => 2 ); # adjust to midnight while ($dt2 > $dt1){ print $dt1->ymd() . q{ } . $dt1->hms(); $dt1->add( days => 1 ); } __END__ $ perl -wl 641322.pl | head 2005-12-22 00:00:00 2005-12-23 00:00:00 2005-12-24 00:00:00 2005-12-25 00:00:00 2005-12-26 00:00:00 2005-12-27 00:00:00 2005-12-28 00:00:00 2005-12-29 00:00:00 2005-12-30 00:00:00 2005-12-31 00:00:00
In reply to Re: Loop through epoch days
by andreas1234567
in thread Loop through epoch days
by Scrat
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |