Branch Coverage

blib/lib/Perl/ToPerl6/Transformation.pm
Criterion Covered Total %
branch 6 30 20.0


line true false branch
46 0 1 if (@_ != $CONSTRUCTOR_ARG_COUNT)
50 0 1 if (eval { do { $elem->isa('Perl::ToPerl6::Document') } })
55 0 1 unless (eval { do { $elem->isa('PPI::Element') } })
76 0 1 $top->can('filename') ? :
93 0 0 unless ref $_[0]
94 0 0 unless wantarray
99 0 0 unless $Perl::ToPerl6::Transformation::a->[1] <=> $Perl::ToPerl6::Transformation::b->[1]
108 0 0 unless ref $_[0]
109 0 0 unless wantarray
165 0 0 unless ($diagnostics{$transformer})
190 0 0 unless ($expl)
193 0 0 if (ref $expl eq 'ARRAY')
194 0 0 @{$expl;} > 1 ? :
302 0 1 if $inx > @lines
312 2 0 if not defined $_ or ref $_