Michael G Schwern <[EMAIL PROTECTED]> writes:
> Ok, I've nailed down the t/io/dup.t problem. It appears that system()
> does not honor the changing of STDOUT.
>
> open(STDOUT, ">somefile.tmp") or die $!;
> system(qq{$^X -le "print q{system}"});
> print `$^X -le "print q{backticks}"`;
>
> This is VMS
>
> $ perl dup_bug
> system
> $ cat somefile.tmp
> backticks
>
> and this is Linux
>
> $ perl dup_bug
> $ cat somefile.tmp
> system
> backticks
>
And this is VMS with the "system()&pipe_and_fork devoured by Pipe I/O Borg"
patch that I posted on 9 Nov:
$ perl dup_bug
$ type somefile.tmp
system
backticks
$
See what you get for not being at the bleeding edge of VMS patching? :)
--
Drexel University \V --Chuck Lane
======]---------->--------*------------<-------[===========
(215) 895-1545 _/ \ Particle Physics
FAX: (215) 895-5934 /\ /~~~~~~~~~~~ [EMAIL PROTECTED]
