#!/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);