xref: /openbsd-src/gnu/usr.bin/perl/cpan/Time-Piece/t/05overload.t (revision b39c515898423c8d899e35282f4b395f7cad3298)
1# Tests for overloads (+,-,<,>, etc)
2use Test;
3BEGIN { plan tests => 1 }
4use Time::Piece;
5my $t = localtime;
6my $s = Time::Seconds->new(15);
7eval { my $result = $t + $s };
8ok($@, "", "Adding Time::Seconds does not cause runtime error");
9
10