Select Code to Download

<% @Language="PerlScript" %>
<!--#Include File="base/base.asp"-->
...
$Response->Write("Topic is $topic\n");
$Response->Write("my target is $nightmare\n");
}

 
sub tHelp
  {   
...
    }
}
}

sub pMain
  {
...
    }    
    return $str;
  }

$xmlPage  = "<document here=\
                           queryString=\"$queryString\" 
...
    $xmlPage .= "\n</document>";
    return $xmlPage;
  }

 
sub mLeftIndex
  {
...
        $content .= '</leftIndex>';
        
    }

 
  sub transform
  {
...
    }     
    return $trns;
  }