Web::Scraper cookie設定

Web::Scraper - search.cpan.orgcookie設定

#!/usr/bin/perl

use strict;
use warnings;
use Web::Scraper;
use URI;
use HTTP::Cookies;
use Data::Dumper;

my $cookie_file = '/path/to/cookies.txt';
my $cookie_jar = HTTP::Cookies->new(file => $cookie_file, autosave =>1);

my $url = shift;

my $scraper = scraper{
		process '', '' => '';
};
   $scraper->user_agent->cookie_jar($cookie_jar);

my $uri = URI->new($url);
my $result = $scraper->scrape($uri);
print Damper($result);