diff options
| author | Charles Lane <lane@DUPHY4.Physics.Drexel.Edu> | 2000-09-12 04:35:59 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-09-12 13:29:19 +0000 |
| commit | 9428117fbc56a438c81325776103d98e0ef40329 (patch) | |
| tree | de53d490ff5b13cae6a3c84ba9709af241df5565 /vms | |
| parent | 914184e127659d74e06479dfe3f4f7da0f8315c4 (diff) | |
| download | perl-9428117fbc56a438c81325776103d98e0ef40329.tar.gz | |
Perl 5.6.0, 5.7.0 ... vms/test.com to eliminate spurious NL's in test output
Message-Id: <000912081130.13ca9@DUPHY4.Physics.Drexel.Edu>
p4raw-id: //depot/perl@7053
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/test.com | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/test.com b/vms/test.com index 608d243863..afc1e5786e 100644 --- a/vms/test.com +++ b/vms/test.com @@ -171,7 +171,7 @@ while ($test = shift) { } else { $switch = ''; } - open(results,"\$ MCR Sys\$Disk:[]Perl. \"-I[-.lib]\" $switch $test |") || (print "can't run.\n"); + open(results,"\$ MCR Sys\$Disk:[]Perl. \"-I[-.lib]\" $switch $test 2>&1|") || (print "can't run.\n"); $ok = 0; $next = 0; $pending_not = 0; |