if (!$Session->{'isAuthenticated'})
{
    $Response->write( 'session is authenticated' );
    my $server_name = $Request->ServerVariables("SERVER_NAME")->item();
    $Response->write( "server name is '$server_name'" );

# ... etc ...
}