网站对$ua->agent("Mozilla/8.0")的校验

[root@dr-mysql01 test]# cat get.pl
use  LWP::UserAgent;

my $ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;
$ua->agent("Mozilla/8.0");

my $response = $ua->get('http://mp.weixin.qq.com/s?__biz=MzA5NTcxNzY3Nw==&mid=213258239&idx=1&sn=7cfaff263b64209e43756482d5f7333e&scene=1#rd');

if ($response->is_success) {
print $response->decoded_content;  # or whatever
}
else {
die $response->status_line;
}

---------------------------------------------------------------------------------------------------------------------------------------------------

use Encode;
use Encode::CN;
use URI::Escape;
use LWP::Simple;
$host = "http://http://mp.weixin.qq.com/s?__biz=MzA5NTcxNzY3Nw==&mid=213258239&idx=1&sn=7cfaff263b64209e43756482d5f7333e&scene=1#rd";

$content = get($host);
print "\$content is $content\n";
 http://mp.weixin.qq.com/s?__biz=MzA5NTcxNzY3Nw==&mid=213258239&idx=1&sn=7cfaff263b64209e43756482d5f7333e&scene=1#rd 
对$ua->agent("Mozilla/8.0"); 有判断