use LWP::UserAgent; $ua = LWP::UserAgent->new; $ua->agent("$0/0.1 " . $ua->agent); # $ua->agent("Mozilla/8.0") # pretend we are very capable browser $req = HTTP::Request->new( GET => 'http://www.baidu.com'); $req->header('Accept' => 'text/html'); # send request $res = $ua->request($req); print $res->decoded_content;
缺少网络连接库 LWP的时候报错
Can’t locate LWP/UserAgent.pm in @INC (you may need to install the LWP::UserAgent module) (@INC contains: /opt/local/lib/perl5/site_perl/5.26/darwin-thread-multi-2level /opt/local/lib/perl5/site_perl/5.26 /opt/local/lib/perl5/vendor_perl/5.26/darwin-thread-multi-2level /opt/local/lib/perl5/vendor_perl/5.26 /opt/local/lib/perl5/5.26/darwin-thread-multi-2level /opt/local/lib/perl5/5.26) at readpiwik.pl line 1.
安装一下
perl -MCPAN -eshell cpan> install Bundle::LWP
如果你是一名技术人员可加我QQ 2651-0442-02,如果你是java技术人还可以加入QQ群 1784-9136-0
你将得到的不仅仅是技术的交流，还有职业机会，人生解惑.
首发地址：月小升博客 – https://java-er.com/blog/perl-read-url-connect-lwp/
你将得到的不仅仅是技术的交流，还有职业机会，人生解惑.
无特殊说明，文章均为月小升原创，欢迎转载，转载请注明本文地址，谢谢
这个真没看懂怎么做。