X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FAcme-CPANAuthors-You-re_using.git;a=blobdiff_plain;f=lib%2FAcme%2FCPANAuthors%2FYou%2Fre_using.pm;fp=lib%2FAcme%2FCPANAuthors%2FYou%2Fre_using.pm;h=a2474bbb14eb4f3b2b308b7cc4e26e50dc586229;hp=9fbe898e382b21e77200123809a0469ce13f481a;hb=a5f2d9b989d2afcdb4a7b0cc374439627a516656;hpb=e6c1024084a55bcef215da9be5b6410710be545f diff --git a/lib/Acme/CPANAuthors/You/re_using.pm b/lib/Acme/CPANAuthors/You/re_using.pm index 9fbe898..a2474bb 100644 --- a/lib/Acme/CPANAuthors/You/re_using.pm +++ b/lib/Acme/CPANAuthors/You/re_using.pm @@ -65,7 +65,10 @@ sub register { File::Find::find({ wanted => sub { return unless /\.pm$/; - my $mod = Module::Metadata->new_from_file($_); + my $mod = do { + local $@; + eval { Module::Metadata->new_from_file($_) } + }; return unless $mod; @modules{grep $_, $mod->packages_inside} = (); },