my $dbh = ""; my $session = ''; my $sessionname = 'CGISESSID';