Condition Coverage

lib/B/DeparseTree/P526.pm
Criterion Covered Total %
condition 30 122 24.5


and 3 conditions

line !l l&&!r l&&r condition
161 2 4 0 B::Deparse::is_scalar($kid) and $op->flags & 128
6 0 0 B::Deparse::is_scalar($kid) and $op->flags & 128 and $self->deparse($kid, 1) eq 'ARGV'
281 0 0 0 @texts > 2 and not grep((!/^-?\d+$/u), @texts)
327 0 0 0 not $allow_arrow and $quoted
455 0 9 0 $op->first and $op->first->flags & 4
514 0 0 0 $op->flags & 4 and B::Deparse::_op_is_or_was($op->first, 134) || B::Deparse::_op_is_or_was($op->first, 148)
0 0 0 $op->flags & 4 and B::Deparse::_op_is_or_was($op->first, 134) || B::Deparse::_op_is_or_was($op->first, 148) and $op->first->flags & 4
0 0 0 $op->flags & 4 and B::Deparse::_op_is_or_was($op->first, 134) || B::Deparse::_op_is_or_was($op->first, 148) and $op->first->flags & 4 and B::Deparse::_op_is_or_was($op->first->first, 137) || B::Deparse::_op_is_or_was($op->first->first, 149)
593 2 0 0 $kid->name eq 'list' and B::Deparse::want_list($kid)
671 2 0 0 $minfo->{'object'}->name eq 'scope' and B::Deparse::want_list($minfo->{'object'})
735 0 0 0 $arg->name =~ /^s?refgen$/u and $arg->first->first->name eq 'rv2gv'
749 0 0 0 $arg->name =~ /^s?refgen$/u and not B::Deparse::null($real = $arg->first)
0 0 0 $arg->name =~ /^s?refgen$/u and not B::Deparse::null($real = $arg->first) and $chr =~ /\$/u && B::Deparse::is_scalar($real->first) || $chr =~ /@/u && class($real->first->sibling) ne 'NULL' && $real->first->sibling->name =~ /^(rv2|pad)av$/u || $chr =~ /%/u && class($real->first->sibling) ne 'NULL' && $real->first->sibling->name =~ /^(rv2|pad)hv$/u || $chr =~ /\*/u && $real->first->name eq 'rv2gv'
772 1 0 0 $proto and not $doneok
805 0 0 0 $kid->name eq 'null' and not B::Deparse::null($kid->first)
880 7 0 1 $type eq 'null' and $op->can('first')
7 0 1 $type eq 'null' and $op->can('first') and not B::Deparse::null($op->first)
0 1 0 $type eq 'null' and $op->can('first') and not B::Deparse::null($op->first) and $op->first->name eq 'null' && $op->first->can('first') && !B::Deparse::null($op->first->first) && $op->first->first->name eq 'aelemfast' || $op->first->name =~ /^aelemfast(?:_lex)?\z/u
888 0 0 0 $join_op->name eq 'null' and $join_op->targ == 14
898 0 0 0 $self->pure_string($op->first) && $self->pure_string($op->last)
933 4 0 1 $kid->name eq 'null' and not B::Deparse::null($kid->first)
4 1 0 $kid->name eq 'null' and not B::Deparse::null($kid->first) and $kid->first->name eq 'pushmark'

or 2 conditions

line l !l condition
1023 0 0 $op->reflags // 0

or 3 conditions

line l !l&&r !l&&!r condition
149 0 0 0 $cx >= 16 || $self->{'parens'}
318 0 0 0 not $allow_arrow or B::Deparse::is_scalar($array)
474 0 5 4 ($actions & 15) == 8 || ($actions & 15) == 9 || ($actions & 15) == 10 || ($actions & 15) == 11 || ($actions & 15) == 12 || ($actions & 15) == 13
482 2 0 7 ($actions & 15) == 5 or ($actions & 15) == 12
2 5 0 ($actions & 15) == 6 or ($actions & 15) == 13
495 0 0 0 ($actions & 15) == 3 or ($actions & 15) == 10
0 0 0 ($actions & 15) == 2 or ($actions & 15) == 9
0 0 0 ($actions & 15) == 1 or ($actions & 15) == 8
514 0 0 0 B::Deparse::_op_is_or_was($op->first, 134) || B::Deparse::_op_is_or_was($op->first, 148)
0 0 0 B::Deparse::_op_is_or_was($op->first->first, 137) || B::Deparse::_op_is_or_was($op->first->first, 149)
616 2 0 1 B::Deparse::null($kid->sibling) || $kid->name =~ /^method(?:_named)?\z/u
712 0 0 3 $chr eq '@' or $chr eq '%'
722 2 0 0 $chr eq '$' or $chr eq '_'
749 0 0 0 $chr =~ /\$/u && B::Deparse::is_scalar($real->first) || $chr =~ /@/u && class($real->first->sibling) ne 'NULL' && $real->first->sibling->name =~ /^(rv2|pad)av$/u || $chr =~ /%/u && class($real->first->sibling) ne 'NULL' && $real->first->sibling->name =~ /^(rv2|pad)hv$/u || $chr =~ /\*/u && $real->first->name eq 'rv2gv'
880 0 0 8 $type eq 'const' or $type eq 'av2arylen'
0 0 8 $type =~ /^(?:[ul]c(first)?|fc)$/u or $type eq 'quotemeta'
0 0 8 B::Deparse::is_scalar($op) or $type =~ /^[ah]elem$/u
0 1 0 $op->first->name eq 'null' && $op->first->can('first') && !B::Deparse::null($op->first->first) && $op->first->first->name eq 'aelemfast' || $op->first->name =~ /^aelemfast(?:_lex)?\z/u