| line |
true |
false |
branch |
|
90
|
1 |
21 |
unless -r $file |
|
135
|
1 |
1 |
unless my $module = 'Module::Info'->new_from_file($filepath) |
|
166
|
13 |
2 |
unless @inc |
|
172
|
1 |
36 |
if ref $dir |
|
175
|
17 |
19 |
if (-r $filename) |
|
180
|
13 |
4 |
if $find_first_one |
|
212
|
2 |
7 |
if @_ |
|
233
|
0 |
14 |
unless open MOD, $parsefile |
|
238
|
0 |
108 |
/^=cut/ ? : |
|
|
0 |
108 |
/^=(?!cut)/ ? : |
|
239
|
5 |
103 |
if $inpod or /^\s*#/ |
|
243
|
0 |
103 |
if /^\s*(if|unless|elsif)/ |
|
244
|
1 |
102 |
if (/^\s*package\s+\w[\w\:\']*\s+(v?[0-9._]+)\s*;/) |
|
249
|
89 |
13 |
unless /([\$*])(([\w\:\']*)\bVERSION)\b.*\=/ |
|
250
|
2 |
11 |
$safe ? : |
|
261
|
0 |
13 |
if $@ and not $safe |
|
262
|
2 |
11 |
unless defined $result |
|
266
|
4 |
10 |
if $self->use_version and not ref $result && UNIVERSAL::isa($result, 'version') |
|
339
|
0 |
0 |
unless open my $file, $filename |
|
342
|
0 |
0 |
if /^=[a-z]/ |
|
347
|
0 |
0 |
unless $filename =~ s/\.[^.]+$/.pod/ |
|
349
|
0 |
0 |
unless -f $filename |
|
351
|
0 |
0 |
unless open $file, $filename |
|
354
|
0 |
0 |
if /^=[a-z]/ |
|
419
|
3 |
2 |
if $_ eq '~' |
|
475
|
12 |
6 |
unless defined $version and length $version |
|
551
|
2 |
13 |
if ($status) |
|
557
|
1 |
1 |
if ($self->{'die_on_compilation_error'}) { } |
|
588
|
0 |
1 |
unless ($mod_name) |
|
633
|
2 |
24 |
if /using symbolic ref/ |
|
694
|
2 |
0 |
$_[0] ? : |
|
|
2 |
0 |
if @_ |
|
713
|
2 |
48 |
if (@_) |
|
714
|
2 |
0 |
$_[0] ? : |
|
715
|
2 |
0 |
if $self->{'safe'} |
|
721
|
2 |
29 |
$_[0]->safe ? : |
|
725
|
0 |
31 |
if $method eq 'DESTROY' |
|
729
|
0 |
31 |
unless $code |
|
748
|
2 |
16 |
if (@_) |
|
749
|
0 |
2 |
if $_[0] and not $has_version_pm |
|
752
|
2 |
0 |
$_[0] ? : |
|
840
|
0 |
18 |
&_is_macos_classic() ? : |
|
844
|
0 |
18 |
if (&_is_win95()) { } |
|
|
0 |
18 |
elsif (&_is_macos_classic()) { } |