my $session = Session->new( { cgi => $cgi, model => $model } );
$session->create;
[...]
sub niegenutztesub {
	$session->header;
	tuetwas();
	exit;
}