sub transform
  {
      if (!$Session->{'isAuthenticated'}) 
      { 
      #Following statement checks if site is www prefix if so it checks tempo or mlxhelp and uses appropriate stylesheet
      #for each this only checks www. prefix need another to check the rest of the potential matches
   
    
       
      if ($Request->ServerVariables("SERVER_NAME")->item()=~/(\w+)\.com/) 
       {  
          $domain = $1;
         #$Response->write("This is the domain");
          if ($1 eq 'tempohelp')
          {
          my $trns= $Server->MapPath("Transforms/tpLogin.xsl");
          return $trns;
          }
          if ($1 eq 'mlxhelp')
          {
          $Response->write("This is the domain $1");
          my $trns=$Server->MapPath("Transforms/pLogin.xsl");
          return $trns;
          }
       
       }
       #closes wwww prefix check..
    if (!(substr($Request->ServerVariables("SERVER_NAME")->item(),0,3) eq "www") && !(substr($Request->ServerVariables("SERVER_NAME")->item(),0,3) eq "mlx") && !(lc($Request->ServerVariables("SERVER_NAME")->item()) eq "localhost"))
      {
     $Request->ServerVariables("SERVER_NAME")->item() =~ /([\w]*)\./;
      $str .= ".$1.";
      $Response->write("this is $str");
     }