Make Time::HiRes optional

Corion · Jun 8, 2011 · c4e2a12 · c4e2a12
1 parent 1b72df4
commit c4e2a12
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/bin/ffeedflotr.pl b/bin/ffeedflotr.pl
@@ -238,7 +238,8 @@ =head1 OPTIONS
     $app->plot(@data);
 
     if ($stream) {
-        sleep $sleep_interval;
+        require Time::HiRes;
+        Time::HiRes::sleep($sleep_interval);
         redo DO_PLOT
             unless $done;
     };

diff --git a/lib/App/Ffeedflotr.pm b/lib/App/Ffeedflotr.pm
@@ -3,7 +3,6 @@ use strict;
 use vars qw($VERSION);
 use WWW::Mechanize::Firefox;
 use Time::Local;
-use Time::HiRes qw(sleep);
 use File::Temp qw(tempfile);
 use List::Util qw(min);