perl -we 'use Time::HiRes "time"; print time, "\n";'