Select Code to Download

use strict;
use warnings;
...
use Data::Dumper;
my $t = DateTime->now;
print Dumper $t;

$VAR1 = bless( {
                 'local_rd_secs' => 25639,
...
                 'utc_rd_days' => 735072,
                 'offset_modifier' => 0
               }, 'DateTime' );