this file field is required, but may happen to be undef when META.yml is broken

Author: charsbar

lib/Module/CPANTS/Kwalitee/FindModules.pm

@@ -21,10 +21,10 @@ sub analyse {
         my $provides = $me->d->{meta_yml}{provides};
         while (my ($module,$data)=each %$provides) {
             next unless ref $data eq ref {}; # ignore wrong format
-            my $file=$data->{file};
+            my $file=$data->{file} || '';
             my $found={
                 module=>$module,
-                file=>$data->{file},
+                file=>$file,
                 in_basedir=>0,
                 in_lib=>0,
             };