#!/usr/bin/perl -wuse LWP::UserAgent; #安装包my $agent=LWP::UserAgent->new();$url="http://XXXXXXXXXX";$response = $agent->get("$url");$efetch_out=$response->content ;print "$efetch_out\n";我一直都是用这个方法抓取页面的,从来没有乱码过,这次一个页面不知道为什么抓出来是乱码。