perl自动判断http response的charset

 HTML::Encoding

使用这个模块可以探测一个http请求返回结果的charset

用法如下：

  use HTML::Encoding 'encoding_from_http_message';
  use LWP::UserAgent;
  use Encode;
 
  my $resp = LWP::UserAgent->new->get('http://www.sohu.com');
  my $enco = encoding_from_http_message($resp);
print $enco;

 

新开小站欢迎访问 http://lamp.sh.cn 我们的lamp世界，分享lamp类技术