in reply to sleep(2.5)

Just use Time::HiRes: 

  use Time::HiRes qw(sleep);
  sleep(2.5);

[download]

-sam

In Section Seekers of Perl Wisdom