summaryrefslogtreecommitdiff
path: root/t/op/write.t
diff options
context:
space:
mode:
authorCraig A. Berry <craigberry@mac.com>2001-06-21 04:58:52 -0500
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-22 12:07:19 +0000
commitd4a0c6f3fd7e1afcf00066d61e6733d74c5a3772 (patch)
tree04f183c3f537f2c9347f2545b4e844ea842cb2eb /t/op/write.t
parente32f01490f26807de0d82fac927cc0dcb0bf3a59 (diff)
downloadperl-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-xt/op/write.t5
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