perl load cookie 登录铜板街

scan724

于 2020-11-30 22:31:48 发布

阅读量540

点赞数 1

分类专栏： perl LWP

本文链接：https://blog.csdn.net/zhaoyangjian724/article/details/65445409

版权

perl LWP 专栏收录该内容

111 篇文章 33 订阅 ¥39.90 ¥99.00

订阅专栏

本文详细介绍了如何利用Perl编程语言处理Cookie来实现登录铜板街网站的步骤，包括解析登录页面、设置Cookie、发送登录请求以及处理登录后的会话维持。通过实例代码演示了关键操作，适合对Perl和网页自动化有兴趣的读者。

摘要由CSDN通过智能技术生成

use LWP::UserAgent;
use HTTP::Cookies;
use HTTP::Headers;
use HTTP::Response;
use Encode;
use JSON;
use File::Temp qw/tempfile/;
my $ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;
my $now          = time();
$ua->agent("Mozilla/8.0");
my $cookie_jar = HTTP::Cookies->new(

    file           => 'lwp_cookies.txt',
    autosave       => 1,
    ignore_discard => 1
);
   $ua->cookie_jar($cookie_jar);
   my $str=(rand(1));
   if ( $cookie_jar){
   $cookie_jar->load( $cookie_jar );
   my $now          = time();
   my $url="https://trade.tongbanjie.com/trade/web/member/assets/myassets.html";
   my $response = $ua->get("$url");
   if ($res

了解本专栏