diff options
Diffstat (limited to 'ext/Time/HiRes/HiRes.pm')
| -rw-r--r-- | ext/Time/HiRes/HiRes.pm | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/ext/Time/HiRes/HiRes.pm b/ext/Time/HiRes/HiRes.pm index f1588302ea..a14dbb0255 100644 --- a/ext/Time/HiRes/HiRes.pm +++ b/ext/Time/HiRes/HiRes.pm @@ -7,6 +7,7 @@ require Exporter; require DynaLoader; @ISA = qw(Exporter DynaLoader); +@ISA = qw(Exporter); @EXPORT = qw( ); @EXPORT_OK = qw (usleep sleep ualarm alarm gettimeofday time tv_interval @@ -15,7 +16,7 @@ require DynaLoader; d_usleep d_ualarm d_gettimeofday d_getitimer d_setitimer d_nanosleep); -$VERSION = '1.68'; +$VERSION = '1.69'; $XS_VERSION = $VERSION; $VERSION = eval $VERSION; @@ -32,7 +33,15 @@ sub AUTOLOAD { goto &$AUTOLOAD; } -bootstrap Time::HiRes; +eval { + require XSLoader; + XSLoader::load('Time::HiRes', $XS_VERSION); + 1; +} or do { + require DynaLoader; + local @ISA = qw(DynaLoader); + bootstrap Time::HiRes $XS_VERSION; +}; # Preloaded methods go here. @@ -363,6 +372,10 @@ platforms like Cygwin and MinGW) the Time::HiRes::time() may temporarily drift off from the system clock (and the original time()) by up to 0.5 seconds. Time::HiRes will notice this eventually and recalibrate. +=head1 SEE ALSO + +L<BSD::Resource>, L<Time::TAI64>. + =head1 AUTHORS D. Wegscheid <wegscd@whirlpool.com> |