1 files changed, 3 insertions, 2 deletions
diff --git a/clean_perl b/clean_perl
index 99d0d46..4adff6b 100755
--- a/clean_perl
+++ b/clean_perl
@@ -1,8 +1,8 @@
 #!/bin/sh
 
-d=$RPM_BUILD_ROOT/usr/lib/perl5
+for d in $RPM_BUILD_ROOT/usr/lib/perl5 $RPM_BUILD_ROOT/usr/share/perl5 /usr/lib64/perl5;do 
 
-[ -d $d ] || exit 0
+[ -d $d ] || continue
 
 find $d -name ".packlist" | xargs rm -f
 
@@ -18,3 +18,4 @@ for i in $(find $d -name "*.bs"); do
 done
 
 find $d -depth -mindepth 2 -type d -empty -exec rmdir {} \;
+done