use strict;

use lib qw( . );
use edt;

my $edt = new edt();

print "DateTime::VERSION = ".$DateTime::VERSION."<\n";

print $edt->epoch()."\n";

$edt->custom();

# dies here
$edt->from_epoch( epoch => time() );