Select Code to Download

my $url='http://www.xmrc.com.cn/net/enterprise/login.aspx';
my $ua=LWP::UserAgent->new(agent=>'Mozilla/5.0 (Windows NT 10.0; rv:46
+.0) Gecko/20100101 Firefox/46.0',timeout=>10);
...
);
my $newreq=$ua->request(GET 'http://www.xmrc.com.cn/net/enterprise/Res
+ume.aspx?TalentID=95438746')->as_string;
print $newreq;

use Coro;
use AnyEvent::HTTP;
...
);
my @rouse=Coro::rouse_wait;
print $rouse[0];

$ua->request(POST $url,
[
...
'ctl00$Body$ctl00$LoginButton'=>'登录'
]
);