2 files changed, 5 insertions, 0 deletions
diff --git a/NEWS b/NEWS
index 24e9f79..1728a9f 100644
--- a/NEWS
+++ b/NEWS
@@ -1,6 +1,9 @@
 2012-03-05 D Morgan <dmorgan@mageia.org> 0.31.6
     * prevent waiting for non existing files if files contains space or dash
 
+2011-04-16 Funda Wang <fwang@mandriva.org> 0.31.5
+    * remove empty dirs for perl modules
+
 2010-11-22 Funda Wang <fwang@mandriva.org> 0.31.4
 	* xz 5.0 do not support '--text' option now.
 
diff --git a/clean_perl b/clean_perl
index 9d756b0..eca5b63 100755
--- a/clean_perl
+++ b/clean_perl
@@ -16,3 +16,5 @@ for i in $(find $d -name "*.bs"); do
 	rm -f $i
     fi
 done
+
+find $d -depth -type d -exec rmdir {} 2>/dev/null \;