Branch Coverage

blib/lib/App/PerlPackage2PlantUMLClassDiagram/Package.pm
Criterion Covered Total %
branch 25 36 69.4


line true false branch
12 1 12 unless (-f $source)
37 1 12 unless $package
45 0 7 unless $includes
51 0 2 unless defined $statement->pragma
52 0 2 unless $statement->pragma =~ /^parent|base$/u
57 0 2 if ($parent->isa('PPI::Token::Quote')) { }
2 0 elsif ($parent->isa('PPI::Token::QuoteLike::Words')) { }
59 0 0 $parent->can('literal') ? :
73 1 22 unless $self->document->find('PPI::Statement::Sub')
80 2 62 unless $variable
83 0 62 unless $list
86 0 62 unless @$symbols
87 60 2 if $symbols->[0]->content eq '$self' or $symbols->[0]->content eq '$class'
103 14 0 if $receiver
112 16 2 unless not $receiver
121 14 0 unless not $receiver
130 1 5 unless $package_name
145 5 1 unless @$parent_packages