use session;

my $dbh = DBI->connect($dsn, $user, $password) || die "can't connect, errmsg = $DBI::errstr";

my $session = session->new($dbh);

if($session->session()){
# Session aktiv
# Hier werden nun weitere Routinen der Klasse aufgerufen 

print $session->getUsername;

# Das Problem
print $session->getField("parameterA","parameterB");


}else{
# Session nicht aktiv
}