Cool! And when I inserted the system() call, it worked!
John
At 2002-08-28 05:31 PM, Michael Abootorab wrote:
>Hi ,
>
>I tested the following and it works.
>
> use CGI qw(:standard);
> my $query = new CGI;
> $| = 1; # don't buffer output
>
> print header;
> print start_html;
>
> print "some html tags\n";
> print end_html;
>
>it will generate :
>
>Content-type: text/html
>
><!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
>some html tags
>thanks
>Michael
>
>
>On Wed, 28 Aug 2002 17:12:18 -0400, John Korb <[log in to unmask]> wrote:
>
> >Thanks Ron, Michael, and Greg!
> >
> >Hmmm. Progress, but still there are problems. I'm getting a lot of 500
> >errors - "server error" - and the Apache error_log shows a lot of
> >"malformed header=" with the text after the "Malformed header=" either
> >blank or containing garbage.
> >
> >So, I'm off to run more experiments!
> >
> >Thanks again to all for your help!
> >
> >John
> >
> >At 2002-08-28 03:14 PM, you wrote:
> >>Again, thanks to everyone!
> >>
> >>I have a working Perl script. That is, it works if run from the POSIX
> >>shell prompt.
> >>
> >>However, when I invoke it from a web browser and Apache serves it up, the
> >>output of the MPE program apparently goes to the Apache job's $STDLIST and
> >>not back out to the web browser. For example, when I try:
> >>
> >>#!/usr/local/bin/perl
> >>
> >>print "Content-type: text/html\n\n";
> >>print "<HR><P>\n";
> >>system ("/SYS/PUB/DISCFREE A");
> >>print "<P><HR>\n";
> >>
> >>I see only a horizontal rule, the program header for DISCFREE, and the
> >>seconds horizontal rule. I don't see any of the "DISCFREE A" output.
> >>
> >>I created a "Hello World!" program in a Business Basic and SPLASH! and if
>I
> >>replace the "/SYS/PUB/DISCFREE A" with "/SYS/PUB/HELLOWLD" I receive only
> >>the two horizontal rules - no "Hello World!" text.
> >>
> >>Anyone have any ideas as to what is happening here and how to get around
>it?
> >>
> >>Thanks!
> >>
> >>John
> >>
> >>* To join/leave the list, search archives, change list settings, *
> >>* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
> >
> >* To join/leave the list, search archives, change list settings, *
> >* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>
>* To join/leave the list, search archives, change list settings, *
>* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|