"Craig A. Berry" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > In fact, a more low-tech way to get the behavior you are looking for might be to put > > $ define/user_mode sys$input sys$command > > into vmspipe.com. I guess that would look something like the following, though I haven't tested this: > > --- vmspipe.com Sat May 24 00:49:00 2003 > +++ new_vmspipe.com Thu May 29 13:24:59 2003 > @@ -6,7 +6,10 @@ > $ perl_del = "delete" > $ pif = "if" > $! --- define i/o redirection (sys$output set by lib$spawn) > -$ pif perl_popen_in .nes. "" then perl_define/user/name_attributes=confine sys$input 'perl_popen_in' > +$ pif perl_popen_in .nes. "" > +$ then perl_define/user/name_attributes=confine sys$input 'perl_popen_in' > +$ else perl_define/user/name_attributes=confine sys$input sys$command > +$ endif > $ pif perl_popen_err .nes. "" then perl_define/user/name_attributes=confine sys$error 'perl_popen_err' > $ pif perl_popen_out .nes. "" then perl_define sys$output 'perl_popen_out' > $! --- build command line to get max possible length > [eop] > >From my initial testing this looks to work correctly with just this change. I have pulled out my code in VMS.C and added this into the VMSPIPE.COM as well as in the code in VMS.C that builds the temporary files if it can't find VMSPIPE.COM.
Michael Downey MegaSys Computer Technologies
