| line |
true |
false |
branch |
|
64
|
0 |
124 |
unless open my $fh, $file |
|
66
|
0 |
124 |
unless close $fh |
|
83
|
0 |
12 |
unless open my $fh, $file |
|
85
|
0 |
12 |
unless close $fh |
|
204
|
0 |
54 |
unless -d $personal_defaults_dir |
|
211
|
0 |
55 |
unless -d $home_dir |
|
232
|
0 |
49 |
unless open my $FILE, '<', 'File::Spec'->catfile($dist_name, 'LICENSE') |
|
235
|
0 |
49 |
unless close $FILE |
|
275
|
2 |
2 |
if (defined $pred{'pod_present'}) |
|
278
|
2 |
2 |
if (defined $pred{'constructor_present'}) |
|
287
|
2 |
0 |
if (do {
$predictref
}->{'pod_present'} == 0) { } |
|
298
|
2 |
0 |
if (do {
$predictref
}->{'constructor_present'} == 0) { } |