perlquestion
stuffy
I have what shlould be a simple script that I am writing for
our intranet at work. I am Posting information, it processes
it, then it is supposed to show the output on the screen.
Instead I am getting a dialog box asking to save the file.
I am unable to use CGI due to the fact that it is not loaded
on the server, and I do not have enough room in my personal
directory for a local copy with all the other stuff I have in
there. Here is the part in question:
<code>
print "Content-type:test/html\n\n";
print "<HTML>\n";
print "<BODY>\n";
while (<INPUTFILE>) {
if (/^(.*?)$tool_number(.*)$/{
($continue) =1;
}
if (/^(.*?)$end_tool(.*)$/ {
($continue) = 0;
}
if ($continue ==1){
print "some stuff\n";
}
}
</code>
I would include the rest of the code.....but I'm not a very
good programmer, and It would get hacked to heck. Plus it is
related to my work....gotta love those "created at work"
clauses.