diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-27 20:29:07 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-27 20:29:07 +0000 |
| commit | b59310eab4250075948eb8d24039fddf5fe4665d (patch) | |
| tree | edaadb714c63947adcafba77e8e8ed8a291c362d /t | |
| parent | 94b1a389027e45d9baea7e83f0f811a87870e49a (diff) | |
| download | perl-b59310eab4250075948eb8d24039fddf5fe4665d.tar.gz | |
Make Time::Piece::strptime() to be a function, not a method.
p4raw-id: //depot/perl@10238
Diffstat (limited to 't')
| -rw-r--r-- | t/lib/time-piece.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/t/lib/time-piece.t b/t/lib/time-piece.t index bf41a7ddd3..c62e36d95e 100644 --- a/t/lib/time-piece.t +++ b/t/lib/time-piece.t @@ -314,7 +314,9 @@ print "ok 84\n"; print "not " unless Time::Piece::_is_leap_year(1904); print "ok 85\n"; -my %T = $t->strptime("%T", "12:34:56"); +use Time::Piece 'strptime'; + +my %T = strptime("%T", "12:34:56"); print "not " unless keys %T == 3 && $T{H} == 12 && $T{M} == 34 && $T{S} == 56; print "ok 86\n"; |