#!/usr/bin/perl -w

use strict;

use vars '$internal';

BEGIN: {
     eval "require Time::Hires";
     if ($@) { # if it failed
          print "Can't load Time::Hires, falling back to own routines\n";
          $internal =1;
     } else {
          import Time::Hires;
          $internal = 0;
     }
}