From perldoc -f select:

You can effect a sleep of 250 milliseconds this way:
select(undef, undef, undef, 0.25);
[download]

While sleep() is usually good enough, select() comes in handy sometimes.