Do not leak dirhandles

Author: mohawk2

lib/ExtUtils/Liblist.pm

@@ -16,6 +16,7 @@ sub ext {
 sub lsdir {
   shift;
   my $rex = qr/$_[1]/;
+  local *DIR;
   opendir DIR, $_[0];
   my @out = grep /$rex/, readdir DIR;
   closedir DIR;