Perl Tips - Time::HiRes
2003-03-12-1
[Programming]
High-Resolution Timer (Perl での細かいタイマー) について。
普通の sleep だと待ち時間を 1 秒単位でしか指定できない。
そこで、Time::HiRes <http://search.cpan.org/dist/Time-HiRes/> を使うとより細かく待ち時間を指定できる。(Perl Cookbook より)
普通の sleep だと待ち時間を 1 秒単位でしか指定できない。
そこで、Time::HiRes <http://search.cpan.org/dist/Time-HiRes/> を使うとより細かく待ち時間を指定できる。(Perl Cookbook より)
use Time::HiRes qw(sleep); my $n = shift @ARGV; for (my $i = 0; $i < $n; $i++) { print "\x07"; # beep sleep(0.25); }