| line |
true |
false |
branch |
|
44
|
28 |
1 |
if (my $stmt = $doc->find_first(\&Perl::Critic::Policy::logicLAB::RequireVersionFormat::_is_version_declaration_statement))
|
|
52
|
0 |
27 |
if ($version_spec and $self->{'_strict_quotes'} and $separator)
|
|
53
|
0 |
0 |
if ($separator ne q['])
|
|
58
|
14 |
13 |
if ($version_spec and $self->{'_ignore_quotes'} and $separator)
|
|
65
|
15 |
16 |
if ($version_spec and $version_spec =~ /$format/msx)
|
|
70
|
13 |
16 |
if ($version_spec and not $ok)
|
|
96
|
1 |
1 |
if ($formats)
|
|
109
|
107 |
30 |
if (&any(sub {
ref $t eq $_;
}
, @strip_tokens))
|
|
117
|
27 |
81 |
if (&any(sub {
ref $t eq $_;
}
, @parsable_tokens))
|
|
118
|
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')
|