sync with upstream rpm.org:

"skip over =for ... perlpod construct (RhBug:477516)"
(Ville Skyttä, 2010-02-15)

1 files changed, 1 insertions, 1 deletions

diff --git a/perl.prov b/perl.prov
index 830aeb0..c20c6e9 100755
--- a/perl.prov
+++ b/perl.prov
@@ -101,7 +101,7 @@ sub process_file {
     # properly belongs in the over/back section) but people do not
     # read the perldoc.
 
-    if (m/^=(head[1-4]|pod|item)/) {
+    if (m/^=(head[1-4]|pod|for|item)/) {
       $incomment = 1;
     }