G CGIPLUSSKELV1.0 4-NOV-2021 10:08
VSI C V7.4-002
h
$READONLY$ ISCGIPLUS
CGIPLUSEOFPTR i $CODE$ $LITERAL$ $LINK$ $DATA$ 0
ISCGIPLUS 0
CGIPLUSEOFPTR ( J MAIN ( J __MAIN
@ 6 =
$ =
$ =
= # ~P ^X ^` c G# GL H =D ]@ }< 8 " ݶ0 #( =# > L H =D ]@ }< 8 4G0 B8 b @Zkpb# @G4GBb @Zk c GP ]X ]` p #k# ~ ^ ^ ~ ( GGG 4G B b / @Zk0 " 0 C( " "4G@ BH b @Zk "4G@ BH b / @ZkG` " !0@G " 1"GGGP BX b @Zk( ` " !0 pG "1"GtGP BX b @Zk( / 4G4Gp Bx b @Zk 4G G ] ] } ( 0 #k 4 G DECC$MAIN 4
b# DECC$MAIN 4 @ DECC$MAIN 4 G DECC$EXIT 4 b# DECC$EXIT 4 @ DECC$EXIT 4 G DECC$GETENV 4 b# DECC$GETENV 4 @ DECC$GETENV 4 , G 8 CGILIBVAR 4 0 b# CGILIBVAR 4 4 @ 8 CGILIBVAR 4 D G T CGILIBVAR 4 H b# CGILIBVAR 4 P @ T CGILIBVAR 4 | G DECC$GXFPRINTF 4 b# DECC$GXFPRINTF 4 @ DECC$GXFPRINTF 4 G DECC$GXFPRINTF 4 b# DECC$GXFPRINTF 4 @ DECC$GXFPRINTF 4 G DECC$EXIT 4 b# DECC$EXIT 4 @ DECC$EXIT
= 0 " ; = 0 ; ; ; @ CGILIBVAR DECC$GXFPRINTF 7 DECC$GA_STDOUT p DECC$EXIT DECC$GETENV = 0P " ; = p 7 DECC$$SHELL_HANDLER= DECC$MAIN
I = = %s
= CGIPLUSEOF = WWW_REMOTE_HOST Content-Type: text/html
Expires: Thu, 01 Jan 1970 00:00:01 GMT
%d. Hello world ... well the %s part of it anyway!
A = 1 ) ( CGIPLUSSKELVSI C V7.4-002
? =
4 = TRANSFER$BREAK$GO
=
4 4 =
main 4 = 4 , + l { $
= H
s =
4 4 = __main 4 =
l
=
=
DECC$GA_STDOUT DECC$GXFPRINTF DECC$EXIT DECC$GETENV CGILIBVAR DECC$MAIN DECC$$SHELL_HANDLER
C$GA