5 Einträge, 1 Seite |
$ua->default_headers->push_header("Cookie" => "PHPSESSID=a703b46374933aa4f0deb2b2b7c9ba0e");
$ua->cookie_jar(HTTP::Cookies->new("PHPSESSID=a703b46374933aa4f0deb2b2b7c9ba0e"));
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#!/usr/bin/perl
use strict;
use warnings;
use LWP::UserAgent;
use HTTP::Cookies;
# domain um das cookie zu bekommen
my $initial_url = 'http://some.domain.tld/';
my $agent = LWP::UserAgent->new();
$agent->timeout(10);
my $cookie_jar = HTTP::Cookies->new();
$agent->cookie_jar($cookie_jar);
$agent->get($initial_url);
$agent->post($second_url,\%form_data);
$ua->cookie_jar(HTTP::Cookies->new("PHPSESSID=a703b46374933aa4f0deb2b2b7c9ba0e"));
5 Einträge, 1 Seite |