| line |
true |
false |
branch |
|
44
|
28 |
1 |
if (my $stmt = $doc->find_first(\&_is_version_declaration_statement))
|
|
53
|
0 |
27 |
if ($version_spec and $$self{'_strict_quotes'} and $separator)
|
|
54
|
0 |
0 |
if ($separator ne q['])
|
|
59
|
14 |
13 |
if ($version_spec and $$self{'_ignore_quotes'} and $separator)
|
|
66
|
15 |
16 |
if ($version_spec and $version_spec =~ /$format/msx)
|
|
71
|
13 |
16 |
if ($version_spec and not $ok)
|
|
97
|
1 |
1 |
if ($formats)
|
|
110
|
107 |
30 |
if (any sub {
ref $t eq $_;
}
, @strip_tokens)
|
|
118
|
27 |
81 |
if (any sub {
ref $t eq $_;
}
, @parsable_tokens)
|
|
119
|
14 |
13 |
if ($$t{'separator'}) { }
|
|
131
|
14 |
34 |
if _is_our_version(@_)
|
|
132
|
14 |
20 |
if _is_vars_package_version(@_)
|
|
138
|
0 |
48 |
unless $elem
|
|
139
|
34 |
14 |
unless $elem->isa('PPI::Statement::Variable')
|
|
140
|
0 |
14 |
unless $elem->type eq 'our'
|
|
147
|
0 |
34 |
unless $elem
|
|
148
|
17 |
17 |
unless $elem->isa('PPI::Statement')
|
|
150
|
14 |
26 |
if $_->isa('PPI::Token::Symbol')
|