line |
true |
false |
branch |
79
|
0 |
0 |
if (eval {
do {
$doc->child(1)->content =~ /^# .* (build by mktables|machine-generated .*mktables) /u
}
}) |
87
|
0 |
0 |
if $$self{'optimise_size'} |
115
|
0 |
0 |
if ($last->isa('PPI::Token::Whitespace')) { } |
|
0 |
0 |
elsif ($last->isa('PPI::Statement::End')) { } |
|
0 |
0 |
elsif ($last->isa('PPI::Token::Pod')) { } |
134
|
0 |
0 |
if (not $prev && $next) { } |
137
|
0 |
0 |
if ($next->isa('PPI::Token::Operator') and $$next{'content'} =~ /^(?:,|=|!|!=|==|=>)$/u or $prev->isa('PPI::Token::Operator') and $$prev{'content'} =~ /^(?:,|=|\.|!|!=|==|=>)$/u or $prev->isa('PPI::Token::Structure') or $$self{'optimise_size'} and ($prev->isa('PPI::Token::Word') and 'PPI::Token::Symbol' eq ref $next || $next->isa('PPI::Structure::Block') || $next->isa('PPI::Structure::List') || $next->isa('PPI::Structure::Condition'))) { } |
|
0 |
0 |
elsif ($prev->isa('PPI::Token::Whitespace')) { } |
160
|
0 |
0 |
if ($$self{'optimise_size'}) |
167
|
0 |
0 |
if $n1->isa('PPI::Token::Whitespace') |
169
|
0 |
0 |
if $n3 and $n3->isa('PPI::Token::Whitespace') |
173
|
0 |
0 |
if $n1->isa('PPI::Token::Whitespace') |
174
|
0 |
0 |
if $n2 and $n2->isa('PPI::Token::Whitespace') |
175
|
0 |
0 |
if $n3 and $n3->isa('PPI::Token::Whitespace') || $n3->isa('PPI::Token::Structure') && $n3->content eq ';' |
184
|
0 |
0 |
if (my $n = $node->first_token) |
185
|
0 |
0 |
if $$n{'content'} eq 'foreach' and $n->isa('PPI::Token::Word') |
191
|
0 |
0 |
if ($$node{'content'} =~ /^qw(.)(.*)(.)$/su) |
240
|
0 |
0 |
unless my $ppi = 'PPI::Document'->new(\$src) |
243
|
0 |
0 |
unless $self->document($ppi) |
249
|
0 |
0 |
if (exists $$self{'cache'} and 2048 <= length $src) { } |
252
|
0 |
0 |
if (open my $fh, '<:perlio', $file) { } |
254
|
0 |
0 |
if (-s $fh) |
265
|
0 |
0 |
if (open my $fh, '>:perlio', "$file~") |
267
|
0 |
0 |
if ($oldsrc eq $src or syswrite($fh, $src) == length $src) |