Don't install anything beneath 't' directories.

[p5sagit/p5-mst-13.2.git] / installperl

diff --git a/installperl b/installperl
index f36b4c0..3379369 100755 (executable)
--- a/installperl
+++ b/installperl
@@ -744,7 +744,8 @@ sub installlib {
 
     # ignore patch backups, RCS files, emacs backup & temp files and the
     # .exists files, .PL files, and .t files.
-    return if $name =~ m{\.orig$|~$|^#.+#$|,v$|^\.exists|\.PL$|\.t$};
+    return if $name =~ m{\.orig$|~$|^#.+#$|,v$|^\.exists|\.PL$|\.t$} ||
+              $dir  =~ m{/t(?:/|$)};
 
     $name = "$dir/$name" if $dir ne '';