关于LWP下载网页的一个问题

albertkingking

我想用LWP中的getstore去下载下面链接的页面，为什么没有输出呢？
http://后面的内容如下：
crispr.u-psud.fr/crispr/crispr.php?checked[]=NC_009486_4

albertkingking

求指导 万分感谢

albertkingking

我用LWP::Simple 没有输出结果 然后尝试使用LWP::Curl 还在研究怎么安装 因为总是提示安装失败
提示要安装“Please install ‘curl-config’ seperately and try again.” 然后就完全lost了

b114213903

回复 3# albertkingking


    网站服务器设置了浏览器usragent检测，直接用LWP会被服务器拒绝！试试下面的代码，应该是可以的。

1. use LWP;
   
2. 
   
3. my $browser = LWP::UserAgent->new;
   
4. $browser->agent('Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0');
   
5. 
   
6. my $url = 'http:不让发链接去掉这些汉字//crispr.u-psud.fr/crispr/crispr.php?checked[]=NC_009486_4';
   
7. my $response = $browser->get( $url );
   
8. die "Can't get $url -- ", $response->status_line unless $response->is_success;
   
9. 
   
10. open OUT, ">A.html";
    
11. print OUT $response->content;
    
12. close OUT;

复制代码

albertkingking

太感谢了 我之前在我电脑上装LWP::Curl 一直装不上 就直接用Curl去下载了 再次感谢你~~~回复 4# b114213903


   

thy_shenzhen

查下模块用法不就知道呢

albertkingking

嗯 之前我的电脑怎么都装不上LWP::Curl 最后就直接用Curl下载了 谢谢~回复 6# thy_shenzhen