5 Oct
2009
5 Oct
'09
8:59 p.m.
Turns out that they were defined after all, but just now shown by the SHOW SYMBOL
commands. Oh well. It works.
Sampsa
On 5 Oct 2009, at 18:53, Steve Davidson wrote:
Sampsa,
I would take a look at logicals. They may actually be using them instead. Most of my
scripts use logicals so that it doesn't matter where the script is run from.
-Steve
From: owner-hecnet at Update.UU.SE [mailto:owner-hecnet at Update.UU.SE] On Behalf Of
Sampsa Laine
Sent: Monday, October 05, 2009 12:17
To: hecnet at Update.UU.SE
Subject: [HECnet] OT: CGI parameters in CSWS?
Sorry about the less-than-entirely-relevant question, feel free to ignore, but I am
confused, yet again.
I'm trying to write a quick script to search a file and output the results, in HTML,
over HTTP, so I've decided to use a small DCL script with the CSWS web server on
OpenVMS 8.3. I can't figure out where CSWS sticks the CGI parameters however, the book
says they're meant to be defined as symbols, but this is what my script sees:
SHOW SYMBOL/LOCAL *
P1 = ""
P2 = ""
P3 = ""
P4 = ""
P5 = ""
P6 = ""
P7 = ""
P8 = ""
SHOW SYMBOL/GLOBAL *
$FACILITY == "%X00000001"
$IDENT == "%X00000000"
$RESTART == "FALSE"
$SEVERITY == "1"
$STATUS == "%X00010001"
APACHE$DCL_BIN == "$ APACHE$COMMON:[000000]APACHE$DCL_BIN.EXE"
APACHE$DCL_CMD == "@APACHE$COMMON:[CGI-BIN.FIDONODES]FINDNODE.COM"
APACHE$DCL_ENV == "$ APACHE$COMMON:[000000]APACHE$DCL_ENV.EXE"
APACHE$DCL_RUN == "$ APACHE$COMMON:[000000]APACHE$DCL_RUN.EXE"
APACHE$FLIP_CCL == "$ APACHE$COMMON:[000000]APACHE$SET_CCL.EXE"
APACHE$SET_CCL == "$ APACHE$COMMON:[000000]APACHE$SET_CCL.EXE"
HTTPD == "$ APACHE$COMMON:[000000]APACHE$HTTPD.EXE"
PHP == "$ PHP_ROOT:[BIN]PHP.EXE"
SAY == "WRITE SYS$OUTPUT"
Where did QUERYSTRING etc go?
Here's the script ( http://rhesus.sampsa.com/cgi-bin/fidonodes/findnode.com?q=foo ) :
$ write sys$output "content-type: text/html"
$ write sys$output ""
$ write sys$output "<html><hr /><pre>"
$ WRITE SYS$OUTPUT "SHOW SYMBOL/LOCAL *"
$ show symbol/local *
$ WRITE SYS$OUTPUT "SHOW SYMBOL/GLOBAL *"
$ show symbol/global *