2011-02-16 Perl小ネタ Perl ミリ秒を求める Time::HiRes::gettimeofdayを使う。 use Time::HiRes; $now = Time::HiRes::time; ($seconds, $microseconds) = Time::HiRes::gettimeofday; UNIX_TIMESTAMPがミリ秒単位でわかる。 参考 ミリ秒を求める Script Source Sample for Perl wantarray 実行中のサブルーチンの戻り値として、リストが要求されている場合に真を返し、スカラーが要求されている場合には偽を返す。 参考 wantarray