Select Code to Download

#!/usr/bin/perl
use strict;
...
{
    print $dt->datetime(), "\n";
}

2012-01-01T07:00:00
2012-01-01T22:00:00
2012-01-02T07:00:00
2012-01-02T22:00:00

2012-01-01T08:00:00
2012-01-01T09:00:00
...
2012-01-02T20:00:00
2012-01-02T21:00:00
2012-01-02T22:00:00