Branch Coverage

blib/lib/Perl/Metrics/Simple/Analysis/File.pm
Criterion Covered Total %
branch 41 60 68.3


line true false branch
99 4 32 if (ref $path) { }
100 4 0 if (ref $path eq 'SCALAR') { }
106 0 32 unless (-r $path)
112 2 34 @LOGIC_KEYWORDS ? :
116 1 35 @LOGIC_OPERATORS ? :
120 0 36 @METHOD_MODIFIERS ? :
126 0 36 unless (defined $document)
149 29 3 if (-s $path) { }
192 0 36 unless ($document->isa('PPI::Document'))
215 0 193 unless $eval_result
216 0 193 unless defined $node
218 2 191 unless length $string
228 182 9 if (length $string)
230 79 103 if ($last_char ne "$Perl::Metrics::Simple::Analysis::File::INPUT_RECORD_SEPARATOR")
265 0 0 wantarray ? :
270 0 0 wantarray ? :
275 0 0 wantarray ? :
283 5 76 if ($self->get_node_length($elem) == 0)
287 76 0 if ($elem)
298 42 34 if ($operators_ref)
312 19 17 unless Perl::Metrics::Simple::Analysis::is_ref($found_packages, 'ARRAY')
330 20 16 unless Perl::Metrics::Simple::Analysis::is_ref($found_subs, 'ARRAY')
365 14 598 if ($grandparent->isa('PPI::Structure::Subscript'))
369 6 590 if ($sib->isa('PPI::Token::Operator') and $sib eq '=>')
380 0 229 unless (defined $document)
392 0 36 unless (defined $document)
403 3 0 if $_->[4]->isa('PPI::Token::Word')
409 3 0 if $_->[3]->isa('PPI::Token::Operator')
414 0 3 unless $_->[2]->isa('PPI::Token::Quote')
419 55 10 if $_->[1]->isa('PPI::Token::Word')