用perl做网站压力测试的问题

我用perl写脚本向服务器发出了很多http连接，脚本内容如下：
#!/usr/bin/perl -w
#

open(MYFILE,"url.txt")||die ;
while(defined($url=<MYFILE>)){
        my $url = $url;
        use LWP::Simple;

                my $pid = fork();
                if (!defined($pid))
                        {
                                print ("Fork process failured!\n");
                                exit();
                        }
                if ($pid)
                        {
                                my $content = get $url;
                                getprint $url;
                                die "Couldn't get $url" unless defined $content;
                                exit();
                        }
                else
                {
                                $connect++;
                }
               
}
close(MYFILE);
print "$connect";

exit();

但是在服务器那边查看连接(ESTABLISHED)只有三四个，我用netstat -an 查看，有很多的TIME_WAIT，请高支招！谢谢 ！

会不会一下子就结束了..所以看不到..
TIME_WAIT表示connection close了..准备要被OS回收了...
apache自己有压力测试的软件..好像叫ab的样子....

你的perl脚本运行在linux下还是xp下？

我用ab测过，压力打不上去，在web服务器上连接数在几个，太少了，请问我上边那个脚本写的对吗？

我的脚本运行在linux下

看起来没问题..应该是你同时间连的数目太少了或网页反应太快了.....
你需要更大量的同时连线...

ab应该可以才对..你可能设定错了....

能麻烦您给个示例吗？谢谢

http://blog.longwin.com.tw/archives/000513.html
http://jackei.cnblogs.com/archive/2006/07/18/454144.html
善用google...

这个试过了，我还写了shell脚本，同时并发很多连接过去，但是web服务器那边就是只有少量连接，我有找来了loadrunner工具，还是同样的结果，还有webbench工具，这些都不行了，老板才让我尝试用perl试试

你Server端有做log吗？..如果有的话..检查看看log里面，到底有没有那麽多连线上来,
是不是因为连线数太多..被防火墙挡住了..当成DOS攻击了..

如果你的Server是 linux..检查看看iptables 是不是有启动....