<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<meta name=Generator content="Microsoft Word 10 (filtered)">
<style>
<!--
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman";}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{color:purple;
text-decoration:underline;}
pre
{margin:0in;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:"Courier New";}
span.EmailStyle17
{font-family:Arial;
color:windowtext;}
@page Section1
{size:8.5in 11.0in;
margin:1.0in 1.25in 1.0in 1.25in;}
div.Section1
{page:Section1;}
-->
</style>
</head>
<body lang=EN-US link=blue vlink=purple>
<div class=Section1>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'>Here is what I get when I try to display the webpage</span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'> </span></font></p>
<pre><font size=2 face="Courier New"><span style='font-size:10.0pt'>package RT::Mason;</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>use strict;</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>use vars '$Handler';</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>use File::Basename;</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>require ('/usr/local/RT-3.2.2/bin/webmux.pl');</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'># Enter CGI::Fast mode, which should also work as a vanilla CGI script.</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>require CGI::Fast;</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>RT::Init();</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>while ( my $cgi = CGI::Fast->new ) {</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> # the whole point of fastcgi requires the env to get reset here..</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> # So we must squash it again</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $ENV{'PATH'} = '/bin:/usr/bin';</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $ENV{'CDPATH'} = '' if defined $ENV{'CDPATH'};</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $ENV{'SHELL'} = '/bin/sh' if defined $ENV{'SHELL'};</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $ENV{'ENV'} = '' if defined $ENV{'ENV'};</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $ENV{'IFS'} = '' if defined $ENV{'IFS'};</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> RT::ConnectToDatabase();</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> if ( ( !$Handler->interp->comp_exists( $cgi->path_info ) )</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> && ( $Handler->interp->comp_exists( $cgi->path_info . "/index.html" ) ) ) {</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $cgi->path_info( $cgi->path_info . "/index.html" );</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> }</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> eval { $Handler->handle_cgi_object($cgi); };</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> if ($@) {</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $RT::Logger->crit($@);</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> }</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> if ($RT::Handle->TransactionDepth) {</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $RT::Handle->ForceRollback;</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> $RT::Logger->crit("Transaction not committed. Usually indicates a software fault. Data loss may have occurred") ;</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> }</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>}</span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'> </span></font></pre><pre><font
size=2 face="Courier New"><span style='font-size:10.0pt'>1;</span></font></pre>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'> </span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'>Im trying to use fastcgi. Let me know if you need anything
else.</span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'> </span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'> </span></font></p>
<p class=MsoNormal><font size=2 color=black face="Courier New"><span
style='font-size:10.0pt;font-family:"Courier New";color:black'>Sr. Network
Administrator</span></font></p>
<p class=MsoNormal><font size=2 color=black face="Courier New"><span
style='font-size:10.0pt;font-family:"Courier New";color:black'>The Boeing
Company</span></font></p>
<p class=MsoNormal><font size=2 color=black face="Courier New"><span
style='font-size:10.0pt;font-family:"Courier New";color:black'>301-614-6980</span></font></p>
<p class=MsoNormal><font size=2 color=black face="Courier New"><span
style='font-size:10.0pt;font-family:"Courier New";color:black'>mumphrey@pop100.gsfc.nasa.gov</span></font></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'> </span></font></p>
</div>
</body>
</html>