perl -MTime::HiRes -le 'print join "",Time::HiRes::gettimeofday for (1..10)'
__OUTPUT__
1091103638899022
1091103638899336
1091103638899454
1091103638899566
1091103638899679
1091103638899787
1091103638899897
1091103638900006
1091103638900115
1091103638900239