1107 |
my ($usernum, $userid, $usercnum, $userfirstname, $usersurname, $userbranch, $branchname, $userflags, $emailaddress, $branchprinter, $persona)= |
1107 |
my ($usernum, $userid, $usercnum, $userfirstname, $usersurname, $userbranch, $branchname, $userflags, $emailaddress, $branchprinter, $persona)= |
1108 |
map { utf8::decode($_); $_ } # CGI::Session doesn't handle utf-8, so we decode it here |
1108 |
map { my $a= $_; utf8::decode($a); $a; } # CGI::Session doesn't handle utf-8, so we decode it here |