|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Andrey Sapozhnikov 2:5020/400 22 Nov 2002 06:59:50
To : Alexey Kuzmin
Subject : Re: вывод http-заголовка
--------------------------------------------------------------------------------
Alexey Kuzmin wrote:
> Hullow, Artem!
> А помнишь мессагу к Alexey Kuzmin пpо "Re: вывод http-заголовка"
>
> ST>>>> Думаю, даже не смешно.
> BN>>> угу, смешно, мерять вывод и подгрузку модуля....
> AK>> а в случае выполнения скрипта на апаче разве не так будет?
> AK>> без mod_perl есесна.
> AC> Разумеется, не так. Если ты полагаешь, что без mod_perl не требуются
> AC> каждый раз запуск и инициализация перла, то сильно ошибаешься.
> я как раз это и имел ввиду. в случае наличия отсутствия mod_perl на каждый
> запуск будет грузиться перл, а во втором случае еще и CGI.pm. так что тест
> имхо честный
Попытка честного теста:
============================= test.pl ================================
#!/usr/bin/perl -w
use strict;
use Benchmark;
open STDERR, '> /dev/null';
timethese 50, {
'non-CGI' => sub {
system q{perl -e 'print STDERR "Content-Type:
text/html\n"'}
},
'CGI' => sub {
system q{perl -e 'use CGI; print STDERR
CGI::header()'}
}
}, 'nop';
============================= EOF ================================
============================= output ================================
Benchmark: timing 50 iterations of CGI, non-CGI...
CGI: 10 wallclock secs ( 9.25 cusr + 0.82 csys = 10.07 CPU) @1000.00/s
(n=50)
non-CGI: 2 wallclock secs ( 1.68 cusr + 0.46 csys = 2.14 CPU)
@416.67/s (n=50)
============================= EOF ================================
Hа @xxx.xx/s не обращайте внимания, оно ничего не отражает. А вот
cusr + csys (user and system time of children) это то, что надо.
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
