1 files changed, 5 insertions, 0 deletions
diff --git a/lib/PerlIO/via/t/QuotedPrint.t b/lib/PerlIO/via/t/QuotedPrint.t
index b379f66f5b..4774af3f47 100644
--- a/lib/PerlIO/via/t/QuotedPrint.t
+++ b/lib/PerlIO/via/t/QuotedPrint.t
@@ -7,6 +7,11 @@ BEGIN {				# Magic Perl CORE pragma
         print "1..0 # Skip: PerlIO not used\n";
         exit 0;
     }
+    require Config;
+    if (($Config::Config{'extensions'} !~ /\bPerlIO::via\b/) ){
+        print "1..0 # Skip -- Perl configured without PerlIO::via module\n";
+        exit 0;
+    }
     if (ord("A") == 193) {
         print "1..0 # Skip: EBCDIC\n";
     }