P:\test>perl -MTime::HiRes=time -wle"print time for 1 .. 20; print $Time::HiRes::VERSION, ' ',
1121243012.87537
1121243012.87555
1121243012.87562
1121243012.87569
1121243012.87576
1121243012.87582
1121243012.87588
1121243012.87594
1121243012.876
1121243012.87607
1121243012.87614
1121243012.8762
1121243012.87626
1121243012.87633
1121243012.87639
1121243012.87645
1121243012.87651
1121243012.87658
1121243012.87664
1121243012.8767
1.59 5.008004