App-CamelPKI
view release on metacpan or search on metacpan
lib/App/CamelPKI/Time.pm view on Meta::CPAN
cmp_ok($time, "eq", $time2, "string comparison works");
};
test "synopsis" => sub {
my $code = My::Tests::Below->pod_code_snippet("synopsis");
$code =~ s/print//g;
$code =~ s/my //g;
my ($time, $later);
eval $code; die $@ if $@;
is("$later", "20070524101200Z");
};
test "->advance_days and ->advance_years" => sub {
my $date = App::CamelPKI::Time->now;
ok( ($date->advance_days(365)->zulu eq $date->advance_years(1)->zulu)
or
($date->advance_days(366)->zulu eq $date->advance_years(1)->zulu) );
};
=end internals
( run in 0.232 second using v1.01-cache-2.11-cpan-7add2cbd662 )