May 1996
Volume 1, Issue 2
Writing CGI Scripts in REXX Listing Nine /* ************************************************* */ /* Code fragment for reporting CGI Script diagnostic*/ /* ************************************************* */ PARSE SOURCE ArchName . Fn . /*Fn is returned with the CGI script's filename*/ Debug=1 SAY "Content-type: text/html"; SAY '' IF Debug>0 THEN SAY Fn': PATH_INFO="'GETENV('PATH_INFO')'"' ( back )
Writing CGI Scripts in REXX
Listing Nine /* ************************************************* */ /* Code fragment for reporting CGI Script diagnostic*/ /* ************************************************* */ PARSE SOURCE ArchName . Fn . /*Fn is returned with the CGI script's filename*/ Debug=1 SAY "Content-type: text/html"; SAY '' IF Debug>0 THEN SAY Fn': PATH_INFO="'GETENV('PATH_INFO')'"'
Listing Nine
/* ************************************************* */
/* Code fragment for reporting CGI Script diagnostic*/
PARSE SOURCE ArchName . Fn .
/*Fn is returned with the CGI script's filename*/
Debug=1
SAY "Content-type: text/html"; SAY ''
IF Debug>0 THEN SAY Fn': PATH_INFO="'GETENV('PATH_INFO')'"'
( back )
Copyright Web Techniques. All rights reserved.