use Config;
use subs qw(unlink link chmod);
+if ($Config{d_umask}) {
+ umask(022); # umasks like 077 aren't that useful for installations
+}
+
$Is_NetWare = $Config{osname} eq 'NetWare';
if ($Is_NetWare) {
$Is_W32 = 0;
}
# ignore patch backups, RCS files, emacs backup & temp files and the
- # .exists files, and .PL files.
- return if $name =~ m{\.orig$|~$|^#.+#$|,v$|^\.exists|\.PL$};
+ # .exists files, .PL files, and .t files.
+ return if $name =~ m{\.orig$|~$|^#.+#$|,v$|^\.exists|\.PL$|\.t$};
$name = "$dir/$name" if $dir ne '';