我LWP脚本不工作
答
变量$site
有html
代码。你
也可以使用该功能getstore
到html
数据保存到一个文件,如:
my $http_code = getstore('http://www.google.com/', 'google.html');
答
这将帮助你很多,如果你能看到失败的原因。我建议你使用核心LWP
而不是简单的版本。像这样:
#!/usr/bin/perl
use strict;
use warnings;
use LWP;
my $ua = LWP::UserAgent->new;
my $response = $ua->get('http://www.google.com/');
die 'Couldn't get it: ', $response->status_line unless $response->is_success;
my $site = $response->decoded_content;
print 'Got it.';
你是否安装了curl或wget,并且它们是否工作?如果他们不工作,Perl也不会工作......你没有互联网接入。 – runrig 2013-03-07 22:06:35
@runrig我这么认为。我如何检查我是否? – mtrmilk 2013-03-08 15:14:12