原创 山寨版微信

<pre name="code" class="python">use LWP::UserAgent;
use URI::Escape;
use Net::Ping;
use JSON qw(encode_json);
use Socket;
use Net::SMTP;
use LWP;
use LWP::Simple;
use LWP::UserAgent;
use HTTP::Cookies;
use HTTP::Headers;
use HTTP::Response;
use Encode;
use URI::Escape;
use URI::URL;
use File::Temp qw/tempfile/;
use AE;
my $api          = 'https://login.weixin.qq.com/jslogin';
my $now          = time();
my @query_string = (
    appid        => 'wx782c26e4c19acffb',
    redirect_uri => 'https://wx.qq.com/cgi-bin/mmwebwx-bin/webwxnewloginpage',
    fun          => 'new',
    lang         => 'zh_CN',
    _            => $now,
);

my $ua = LWP::UserAgent->new;
$ua->timeout(5);
$ua->env_proxy;
$ua->agent("Mozilla/8.0");
my $cookie_jar = HTTP::Cookies->new(
    file           => 'lwp_cookies.txt