use Time::HiRes qw (sleep);
 
sleep (0.15); # Replaces sleep() with a high-precision alternative
 
Time::HiRes::sleep (0.2); # if you don't want your standard sleep() overwritten