sleep 2.5;

##</code><code>##

use Time::HiRes qw/sleep/;

##</code><code>##

select(undef, undef, undef, 2.5);