or download this
qwurx [shmem] ~> strace -e trace=nanosleep perl -e 'sleep 1'
nanosleep({1, 0}, 0x7ffe9dc8df90) = 0
...
qwurx [shmem] ~> strace -e trace=select perl -e 'select $u,$u,$u, -3.1
+415926'
select(0, NULL, NULL, NULL, {0, 0}) = 0 (Timeout)
+++ exited with 0 +++