Re: [MacPerl] Getting MacPerl to work with Webstar

[joshg@ola.bc.ca (Josh Gemmell)]

bufbill@cloud9.net said:
>If anyone could help me out with how to get a script running on MacPerl
>to work with Webstar I'd be doubly greatful. When I accesss the script
>in Netscape I get just the text of the script, how can I get it to
>execute. 
>Also what is the proper way of the !# line, what should it be on a mac.

I've been playing around with MacPerl and WebSTAR for a few months now, and
there are a few peculiarities, which I'll try to relate to you off the top of
my head...

First of all, WebSTAR doesn't seem to use the "<!--#exec cgi=" but rather the
"<!--#exec script=" instead. As well, a POST value is mandatory, regardless of
whether or not your CGI wants a parameter sent to it. Make sure that there is
no space between any of the characters in "<!--#exec" and (I don't know if this
is specific to WebSTAR) try to make sure that there *is* a space before the
final "-->" - I've run into some troubles with that.

Another issue I've found (and this may be particular to my site - which
unfortunately is an Intranet so you can't check it out) is that WebSTAR
*assumes* that the output from a MacPerl CGI is "text/html" and any time I add
the print "content-type: text/html" it shows up on the page!

Here's an example of a line from one of my pages that calls a MacPerl CGI:
<!--#exec script="/cgi-bin/showcount.cgi" post="File=maintain?Type=basic" -->

Now, in your script you can pull the values posted with:
read(STDIN, $Input, $ENV{"CONTENT_LENGTH"});

This gives you "File=maintain?Type=basic" in $Input to do with as you will. If
you don't need any parameters sent to the CGI, just pass some gibberish or a
blank string.

Nothing else is springing to mind right now, but if you ask some questions it
may jar something loose...

Joshua Gemmell
Open Learning Agency
www.ola.bc.ca

-----------------------------------------------------------------
                       Open Learning Agency
4355 Mathissi Place, Burnaby, B.C. Canada, V5G 4S8 (604) 431-3000


***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch