<head><style>body{font-family: Geneva,Arial,Helvetica,sans-serif;font-size:9pt;background-color: #ffffff;color: black;}</style><title></title></head><body id="compText">Or use one-liner Perl,<br><br> $ perl -MLWP::Simple -e 'print join "\n",head("http://www.hao123.com")'<br><br>but OP's idea is good,we need practical perl.:-)<br><br><br><blockquote style="border-left: 2px solid rgb(0, 0, 255); padding-left: 5px; margin-left: 0px;">-----Original Message-----
<br>From: James Zheng <jameswork66@gmail.com>
<br>Sent: Aug 21, 2007 10:43 AM
<br>To: marryton007@gmail.com, china-pm@pm.org
<br>Subject: Re: [PerlChina] Fwd: 用Perl统计hao123网址之家首页的网站WEB服务器种类
<br><br>
<zzzhtml>
<zzzhead>
<zzzmeta content="text/html;charset=GB2312" http-equiv="Content-Type">
</zzzmeta>
<zzzbody bgcolor="#ffffff" text="#000000">
curl -I <a class="moz-txt-link-freetext" href="http://www.hao123.com">http://www.hao123.com</a><br>
<br>
就可以了, 不过我知道这个头信息是可以重写的,这些都不是绝对的.<br>
<br>
<br></zzzbody></zzzhead></zzzhtml></jameswork66@gmail.com>
</blockquote></body><PRE>
--
Jeff Pang - pangj@earthlink.net
http://home.arcor.de/jeffpang/</PRE>