line |
true |
false |
branch |
10
|
57 |
807 |
if $_[1]->isa("PPI::Token::Operator")
|
|
28 |
2 |
unless $doc->find(sub {
|
12
|
1 |
3 |
unless $el->isa("PPI::Token::Label")
|
28
|
15 |
15 |
unless $doc->find("PPI::Token::Symbol")
|
40
|
175 |
5 |
unless $doc->find($class)
|
41
|
0 |
5 |
unless my $str = "PPIx::QuoteLike"->new($e)
|
51
|
17 |
13 |
unless $doc->find("PPI::Statement::Variable")
|
52
|
7 |
7 |
unless $st->schildren == 5
|
55
|
0 |
5 |
unless $children[0]->content eq "our" and $children[1]->content eq '@EXPORT' || $children[1]->content eq '@EXPORT_OK' and $children[2]->content eq "=" and $children[3]->isa("PPI::Token::QuoteLike::Words") and $children[4]->content eq ";"
|