X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fio%2Fthrough.t;h=60c75c99217d49d07896e200add088348ffd2dbf;hb=673061948a634568cc156286d219e7f736c6048a;hp=9c8a627f9ddcc6e60ad1f5b427b68ef4adc0ae67;hpb=1031ca5cb29f226276d55908e55745187e79d1c8;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/io/through.t b/t/io/through.t
index 9c8a627..60c75c9 100644
--- a/t/io/through.t
+++ b/t/io/through.t
@@ -1,6 +1,10 @@
 #!./perl
 
 BEGIN {
+    if ($^O eq 'VMS') {
+        print "1..0 # Skip on VMS -- too picky about line endings for record-oriented pipes\n";
+        exit;
+    }
     chdir 't' if -d 't';
     @INC = '../lib';
 }