HTTP::Request mit Cookies

[Benjamin]

hi,

Cookie senden:
#!/usr/bin/perl

use strict;
use LWP::UserAgent;
my $ua = LWP::UserAgent->new();
use HTTP::Cookies;

my $file = 'c:/tmp/keks.txt';
my $cookie = HTTP::Cookies->new(file => $file);
$ua->cookie_jar($cookie);

$cookie->load($file);
$ua->cookie_jar($cookie);

my $request = HTTP::Request->new('GET', 'http://example.com');
$cookie->add_cookie_header($request);

my $response = $ua->request($request);
print $response->as_string;

Jo, was in keks.txt stehen muss, könnte so aussehen:
#LWP-Cookies-1.0
Set-Cookie3: keks=rolfs_cookie; path="/cgi-bin/"; domain="example.com"; path_spec; expires="2003-11-04 13:51:35Z"; version=0

Habe diese Variante nun ausprobiert jedoch erfolglos!!!
Die Seite sagt mir immer noch das ich nicht berechtigt bin darauf zu zu greifen.

In der Keks.txt steht nun folgendes:

#LWP-Cookies-1.0
Set-Cookie3: NAME=xxx; VALUE=32323232323;