|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Nikolay Pichtin 2:5056/30 23 May 2002 22:52:37 To : Andrey Sapozhnikov Subject : Re: Time -------------------------------------------------------------------------------- >> AMB> Hе подскажете ли, как узнать время, за которое сервер >> AMB> обрабатывает, скрипт и формирует страницу? Заранее сенкс. >> .... >> use Time::HiRes qw(gettimeofday tv_interval); >> my $t0=[gettimeofday]; >> my $q=new CGI; AS> Я бы рекомендовал использовать аналогичные функции из AS> модуля Benchmark. Они позволяют мерять не только астрономическое, а AS> еще и машинное время (системное и пользовательское), что зачастую AS> более информативно. AS> use Benchmark; AS> $t0 = new Benchmark; AS> # ... your code here ... AS> $t1 = new Benchmark; AS> $td = timediff($t1, $t0); AS> print "the code took:",timestr($td),"\n"; AS> Hа *nix-like операционках можно учесть и время инициализации [Skip] А еще можно использовать $^T - время, когда был запущен сценарий. * Страусов не пугать! Пол бетонный! -- Hиколай ---------------------------------------------------------------------- --- * Origin: Где начало того конца, которым оканчивается начало? (2:5056/30) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/18133ced7348.html, оценка из 5, голосов 10
|