C:\test>perl -E"sleep 1 for 1..120; say join ' ', times" 0 0.015 0 0