Branch Coverage

blib/lib/ExtUtils/Packlist.pm
Criterion Covered Total %
branch 22 36 61.1


line true false branch
48 0 0 unless exists $ExtUtils::Packlist::Config{$exp_key}
49 0 0 unless $raw_val =~ m[\.\.\./]
72 298 29 if defined $packfile and -f $packfile
121 314 1 if (defined $packfile) { }
123 1 314 unless defined $packfile
125 1 313 unless open $fh, "<$packfile"
132 1600 2646 if ($key =~ /^(.*?)( \w+=.*)$/)
137 0 0 if ($ExtUtils::Packlist::Config{'userelocatableinc'} and $data->{'relocate_as'})
156 17 1 if (defined $packfile) { }
158 1 17 unless defined $packfile
160 0 17 unless open $fh, ">$packfile"
164 0 28 if ($ExtUtils::Packlist::Config{'userelocatableinc'})
166 0 0 if ($packfile =~ /$Relocations/)
170 0 0 if ("File::Spec"->no_upwards("File::Spec"->abs2rel($key, $prefix)))
180 0 0 unless (ref $data)
188 1 27 if (ref $data)
207 2 2 unless (-e $key)
210 1 1 if $remove