From d77c669d1daa31a301a4f33a064b0abd5294156c Mon Sep 17 00:00:00 2001
From: Florian Ragwitz <rafl@debian.org>
Date: Wed, 6 Jul 2011 17:05:21 +0200
Subject: [PATCH] Plain scalars are supposed to be literal filenames

Anchor them accordingly.
---
 META.yml               | 1 +
 Porting/Maintainers.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/META.yml b/META.yml
index 52cd85f..febf30d 100644
--- a/META.yml
+++ b/META.yml
@@ -101,6 +101,7 @@ no_index:
     - lib/version.pm
     - lib/version.pod
     - lib/version.t
+    - pod/perldoc.pod
     - pod/perlfilter.pod
     - pod/perlpodstyle.pod
     - Porting/Maintainers.pm
diff --git a/Porting/Maintainers.pm b/Porting/Maintainers.pm
index 6c5b8c2..d4bd4a8 100644
--- a/Porting/Maintainers.pm
+++ b/Porting/Maintainers.pm
@@ -94,7 +94,7 @@ sub filter_excluded {
 	unless my $excluded = $Modules{$m}{EXCLUDED};
 
     my ($pat) = map { qr/$_/ } join '|' => map {
-	ref $_ ? $_ : qr/\Q$_\E/
+	ref $_ ? $_ : qr/\b\Q$_\E$/
     } @{ $excluded };
 
     return grep { $_ !~ $pat } @files;
-- 
1.8.3.1