diff options
author | Craig A. Berry <craigberry@mac.com> | 2001-06-21 04:58:52 -0500 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-22 12:07:19 +0000 |
commit | d4a0c6f3fd7e1afcf00066d61e6733d74c5a3772 (patch) | |
tree | 04f183c3f537f2c9347f2545b4e844ea842cb2eb /t/op/write.t | |
parent | e32f01490f26807de0d82fac927cc0dcb0bf3a59 (diff) | |
download | perl-d4a0c6f3fd7e1afcf00066d61e6733d74c5a3772.tar.gz |
fix Deparse.t and write.t for VMS
Message-Id: <5.1.0.14.0.20010620172532.033cdb88@exchi01>
p4raw-id: //depot/perl@10815
Diffstat (limited to 't/op/write.t')
-rwxr-xr-x | t/op/write.t | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/t/op/write.t b/t/op/write.t index 28309748d1..7dddbb46ec 100755 --- a/t/op/write.t +++ b/t/op/write.t @@ -273,6 +273,11 @@ else # 12..44: scary format testing from Merijn H. Brand +if ($^O eq 'VMS') { + foreach (12..44) { print "ok $_ # skipped: '|-' and '-|' not supported\n"; } + exit(0); +} + use strict; # Amazed that this hackery can be made strict ... # Just a complete test for format, including top-, left- and bottom marging |