use DateTime;

my $epoch = DateTime->new( year => 1968,  month => 1, day => 1,
                           hour  => 0, minute => 0, second => 0,
                           time_zone => 'America/Chicago' );
my $now = DateTime->now();
my $duration = $now->delta_days( $epoch );
print $duration->delta_days(), "\n";
__END__
14644