1 files changed, 19 insertions, 1 deletions
diff --git a/t/TEST b/t/TEST
index 6d842d0859..6dc958791c 100755
--- a/t/TEST
+++ b/t/TEST
@@ -76,13 +76,28 @@ my %temp_no_core =
      '../dist/Unicode-Normalize' => 1,
     );
 
+# temporary workaround Apr 2017.  These need '.' in @INC.
+# Ideally this # list will eventually be empty
+
+my %temp_needs_dot  = map { $_ => 1 } qw(
+    ../cpan/ExtUtils-Install
+    ../cpan/Filter-Util-Call
+    ../cpan/libnet
+    ../cpan/Locale-Codes
+    ../cpan/Math-BigInt
+    ../cpan/Math-BigRat
+    ../cpan/Test-Harness
+    ../cpan/Test-Simple
+    ../cpan/version
+);
+
+
 # delete env vars that may influence the results
 # but allow override via *_TEST env var if wanted
 # (e.g. PERL5OPT_TEST=-d:NYTProf)
 my @bad_env_vars = qw(
     PERL5LIB PERLLIB PERL5OPT
     PERL_YAML_BACKEND PERL_JSON_BACKEND
-    PERL_USE_UNSAFE_INC
 );
 
 for my $envname (@bad_env_vars) {
@@ -245,6 +260,9 @@ sub _scan_test {
 		if ($temp_no_core{$run_dir}) {
 		    $testswitch = $testswitch . ',NC';
 		}
+		if($temp_needs_dot{$run_dir}) {
+		    $testswitch = $testswitch . ',DOT';
+		}
 	    }
 	} elsif ($test =~ m!^\.\./lib!) {
 	    $testswitch = '-I.. -MTestInit=U1'; # -T will remove . from @INC