##
warn ("*****LOGIN ATTEMPT USER INFORMATION Uid: $uid username: $us
+ername password: $password ipaddress: $ipaddress");
####
#my $ipaddress = $session->remote_addr();
warn("AccessInOutLog line 688: $username $forename $lastname $timein $ipaddress $timeout");