if ($user_id eq '') { my $cookie = CGI->new; $user_id = $cookie->cookie('TEC_USER_ID'); my $crypt = Crypt::Lite->new( debug => 0, encoding => 'hex8' ); my $decrypted = $crypt->decrypt($user_id, $ip_address); $user_id = $decrypted; }