# Login Request zusammensetzen
$request = HTTP::Request->new(POST => 'https://tst.com/Login.jsp?a=setLanguage&language=DE');
$request->push_header('Content-Type' => 'application/x-www-form-urlencoded');
$request->content("callTest=set&hotelKey=123&passwd=GEHEIM&weeksToShow=other&Login.y=7");

# Session id auslesen
$response->header('Set-Cookie') =~ /JSESSIONID=(.*?);/;
$sid = $1;

# Request Header
$request = HTTP::Request->new(POST => 'https://tst.com/daten.jsp');
$request->push_header('Cookie' => 'JSESSIONID='.$sid);
....