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