Text::Tabs: skip failing test file for now

This was causing smokes to fail: $ PERLIO=stdio ./perl -Ilib cpan/Text-Tabs/t/dnsparks.t -T and -B not implemented on filehandles at cpan/Text-Tabs/t/dnsparks.t line 130
Perl · Aug 4, 2021 · 972308c · 972308c
1 parent c712ff8
commit 972308c
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/cpan/Text-Tabs/t/dnsparks.t b/cpan/Text-Tabs/t/dnsparks.t
@@ -1,6 +1,15 @@
 use strict; use warnings;
 
 BEGIN {
+        # XXX workaround for bleadperl smokes using PERLIO=stdio:
+        #
+        # $ PERLIO=stdio ./perl -Ilib  cpan/Text-Tabs/t/dnsparks.t
+        # -T and -B not implemented on filehandles at cpan/Text-Tabs/t/dnsparks.t line 130
+
+	if ($ENV{PERLIO} eq 'stdio') {
+		print "1..0 # Skipped: stdio not supported\n";
+		exit;
+	}
 	if ($ENV{HARNESS_ACTIVE}) {
 		print "1..0 # Skipped: not a regression test\n";
 		exit;