使用mod_perl为何CPU消耗得如此厉害？有类似eAccelerator的加速工具吗？

马三囧

RT，囧~

hfahe

mod_perl cpu应该还好 主要用的是内存 考虑是不是代码问题造成cpu负载高 因为mod_perl包含了人Perl的解释器

马三囧

use DBI; print "Content-type: text/plain; charset=utf8\n\n"; print "select goods\n\n"; my $dbh = DBI->connect("DBI:mysql:host=test;database=test;", "test", "test", {'RaiseError' => 1}); my $sth = $dbh->do("SET NAMES utf8"); my $sth = $dbh->prepare ("select * from goods order by rand() limit 10"); $sth->execute(); while (my @row = $sth->fetchrow_array ) {   print "@row\n"; } $sth->finish(); $dbh->disconnect();

就上面这行代码，用web测试工具测试，模拟20个用户，负载居然达到了8

billypeng

如果是普通的CGI方式，应该是正常的，使用fastcgi能够明显地改善。
普通的CGI不适合做高性能的web开发。

马三囧

Apache/2.2.10 (Unix) PHP/5.2.6 mod_perl/2.0.4 Perl/v5.8.8

hfahe

apache的配置呢？

马三囧

LoadModule perl_module                modules/mod_perl.so
Alias /perl-bin/ "/usr/local/apache2/perl-bin/"

<Location /perl-bin/>
     SetHandler perl-script
     PerlResponseHandler ModPerl::Registry
     Options +ExecCGI
     PerlOptions +ParseHeaders
</Location>

AddHandler cgi-script .pl .cgi
PerlRequire "conf/extra.pl"

<Directory "/usr/local/apache2/perl-bin">
    AllowOverride None
    Options None
    Order allow,deny
    Allow from all
</Directory>



use ModPerl::Util ();
use Apache::RequestRec ();
use Apache::RequestIO ();
use Apache::RequestUtil ();
use Apache::ServerRec ();
use Apache::ServerUtil ();
use Apache::Connection ();
use Apache::Log ();
use Apache::Const -compile =>; ':common';
use APR::Const -compile =>; ':common';
use APR::Table ();
use Apache::compat ();
use ModPerl::Registry ();
use CGI ();
1;


./configure --prefix=/usr/local/apache2 --enable-so --enable-deflate --enable-expires --enable-headers --enable-rewrite --enable-proxy --enable-proxy-http --enable-cache --enable-static-support


静态页面200个用户访问负载也不过就是1-2的样子

[ 本帖最后由 马三囧 于 2009-4-22 13:33 编辑 ]

DQP

问个问题哈"负载居然达到了8" 是什么意思啊. 没做过web不懂这些术语好奇. 谢谢.

hfahe

AddHandler cgi-script .pl .cgi
.pl .cgi结尾的文件将被当作CGI程序执行

Options +ExecCGI
也是CGI的配置

hfahe

原帖由 DQP 于 2009-4-22 13:49 发表
问个问题哈"负载居然达到了8" 是什么意思啊. 没做过web不懂这些术语好奇. 谢谢.

用linux你就知道了 top的load average