保存cookie到本地，发送请求时带着cookie。

最新推荐文章于 2024-07-03 16:30:47 发布

qq312788172

最新推荐文章于 2024-07-03 16:30:47 发布

阅读量845

点赞数

分类专栏： perl 文章标签： CGI

本文链接：https://blog.csdn.net/qq312788172/article/details/83777795

版权

perl 专栏收录该内容

29 篇文章 0 订阅

订阅专栏


use Data::Dumper;
use LWP::UserAgent;
use URI;
use HTTP::Date;
use Encode;
use HTTP::Cookies;


my $cookie_jar = HTTP::Cookies->new(file => "d:cookies.lwp",autosave => 1);
my $browser = LWP::UserAgent->new;
$browser->cookie_jar( $cookie_jar );

my $res = $browser->get('http://kailani-exclusive.com/pc/item/detail.cgi?itemCd=050_10642&itemClcd=22');

print decode 'Shift_JIS',$res->content;