--- /usr/lib/rpm/perl.req.ORIG Mon Jun 2 15:00:43 2003
+++ /usr/lib/rpm/perl.req Mon Jun 2 15:03:59 2003
@@ -75,6 +75,9 @@
my ($file) = @_;
chomp $file;
+ if ($ENV{CPAN2RPM} && ! $ENV{CPAN2RPM_REQ_ALL}) {
+ return unless $file =~ /\.pm$/;
+ }
open(FILE, "<$file") || return;