Sleeping in Perl for less then a second

E.g. to sleep to 100 ms.

select(undef, undef, undef, 0.1);