[Info-vax] OSU server and scripts

[Phillip Helbig---undress to reply]

In article <l39e52$2oa$1 at online.de>, helbig at astro.multiCLOTHESvax.de
(Phillip Helbig---undress to reply) writes: 

> In article <l39c3m$vai$1 at online.de>, helbig at astro.multiCLOTHESvax.de
> (Phillip Helbig---undress to reply) writes: 
> 
> > If so, what do I need to get things working? 
> 
> I had VAX executables in the [BIN] directory.  Things work now.

Well, almost.

I have a test script which generates some output as expected.  It starts 
off with 

   $ crlf = f$fao("!/")

If I change this to 

   $ crlf = ""

then the output is identical, except that the first few lines of output 
are missing.  (When looking at the source, as expected the first 
generates extra blank lines between the output lines, but as these are 
ignored in HTML the HTML output looks the same.)

One of the lines which disappears is just

   $ write net_link "test",crlf

If I copy this line to further down in the script, then it IS output.

Can anyone reproduce this with the OSU server and 3.11a on ALPHA?

$ crlf = f$fao("!/")
$! crlf = ""
$ write net_link "<DNETRECMODE2>"
$ cgi_symbols
$ write net_link "content-type: text/html",crlf
$!warum siehe ich hier nichts?
$ write net_link "test",crlf
$ long = "1234567890"
$ long = long + long + long + long + long + long 	! 60
$ long = long + long + long + long			! 240
$ long = long + long + long + long			! 960
$ sublong = "1234567890"
$ write/symbol net_link "x1 BB: ", long,long,crlf
$ write net_link ""
$ write/symbol net_link "x1 CC: ", long,long,crlf
$ write net_link "one line", crlf
$ write net_link "<BR>", crlf
$ write net_link "test",crlf
$ write net_link "<BR>", crlf
$ write net_link "''f$trnlnm("sys$sysdevice")'", crlf
$ write net_link "<BR>", crlf
$ write net_link "<B>TEST</B>"
$ write net_link "<BR>", crlf
$ write net_link "x1: dd DD",crlf
$ write net_link "<BR>", crlf
$ define/user sys$output disk$user:[http_server]xx.xx
$ sh logical
$!goto weiter
$ create disk$user:[http_server]xx.xx
jfweijwep
$ define xxxxx yyyyy
$ aa := bb
$ write net_link "<BR>", crlf
$ write net_link "''f$trnlnm("xxxxx")'", crlf
$ write net_link "<BR>", crlf
$ write net_link "aa", crlf
$ write net_link aa, crlf
$ write net_link "<BR>", crlf
$ copy sys$input net_link
<I>TEST</I>
<BR>
some text
</HTML>
$weiter:
$ exit