Condition Coverage

blib/lib/Perlito/Perl5/Emitter.pm
Criterion Covered Total %
condition 40 56 71.4


and 2 conditions

line l !l condition
606 0 96 $$self{'otherwise'} && scalar @{$$self{'otherwise'}->stmts;}

and 3 conditions

line !l l&&!r l&&r condition
50 1122 0 1804 $c ge 'a' and $c le 'z'
1115 4 3 $c ge 'A' and $c le 'Z'
832 14 273 $c ge '0' and $c le '9'
279 511 144 0 $$self{'sigil'} eq '@' and $$self{'twigil'} eq '*'
655 0 0 $$self{'sigil'} eq '@' and $$self{'twigil'} eq '*' and $$self{'name'} eq 'ARGS'
379 1 0 0 Main::isa($$self{'invocant'}, 'Apply') and $$self{'invocant'}->code eq 'prefix:<@>'
524 0 0 3 $$self{'arguments'} and scalar @{$$self{'arguments'};} == 1
570 86 58 5 Main::isa($parameters, 'Var') and $parameters->sigil eq '@'
80 58 6 Main::isa($parameters, 'Decl') and $parameters->var->sigil eq '@'
579 80 58 0 Main::isa($parameters, 'Var') and $parameters->sigil eq '%'
80 56 2 Main::isa($parameters, 'Decl') and $parameters->var->sigil eq '%'
626 4 1 2 Main::isa($cond, 'Var') and $cond->sigil eq '@'
652 3 0 5 Main::isa($cond, 'Var') and $cond->sigil eq '@'

or 3 conditions

line l !l&&r !l&&!r condition
50 1804 0 1122 $c ge 'a' and $c le 'z' or $c ge 'A' and $c le 'Z'
3 0 1119 $c ge 'a' and $c le 'z' or $c ge 'A' and $c le 'Z' or $c ge '0' and $c le '9'
273 813 33 $c ge 'a' and $c le 'z' or $c ge 'A' and $c le 'Z' or $c ge '0' and $c le '9' or exists $$Hash_safe_char{$c}
570 5 0 144 Main::isa($parameters, 'Var') and $parameters->sigil eq '@' or Main::isa($parameters, 'Decl') and $parameters->var->sigil eq '@'
579 0 0 138 Main::isa($parameters, 'Var') and $parameters->sigil eq '%' or Main::isa($parameters, 'Decl') and $parameters->var->sigil eq '%'