From 559940b257e4566f57a9f46ee38ad0afc55af911 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Fri, 14 Nov 2003 07:43:17 +0000
Subject: [PATCH] Include "SCCS" in the list of directory names that should be
 ignored by installperl.

p4raw-id: //depot/perl@21723
---
 installperl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/installperl b/installperl
index cdc8fc8..a12ec62 100755
--- a/installperl
+++ b/installperl
@@ -792,7 +792,7 @@ sub installlib {
     my $name = $_;
 
     # Ignore version control directories.
-    if (($name eq 'CVS' or $name eq 'RCS' or $name eq '.svn') and -d $name) {
+    if ($name =~ /^(?:CVS|RCS|SCCS|\.svn)\z/ and -d $name) {
 	$File::Find::prune = 1;
 	return;
     }
-- 
2.7.4