- 论坛徽章:
- 0
|
回复 #2 churchmice 的帖子
为什么我用下面的代码得不到网页内容呢?
#!/usr/bin/perl -w
use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
my $req = POST 'http://xin.cz3.nus.edu.sg/group/cjttd/List.asp?SetQuery=Y',
[ TN => 'phosphatase',submit1=>'Submit', errors => 0 ];
print $ua->request($req)->as_string;
这是取回来的网页里报的错误
<HTML><HEAD><TITLE>BIDD: 500-100 The page cannot be displayed</TITLE>
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=Windows-1252">
<font color="#000066" size="2" face="Arial, Helvetica, sans-serif">
There is a problem with the page you are trying to reach and it cannot be displayed. </font>
[ 本帖最后由 libiqing77 于 2009-4-1 21:05 编辑 ] |
|