blib/lib/Parse/BooleanLogic.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 63 | 85 | 74.1 |
line | l | !l | condition |
---|---|---|---|
581 | 0 | 18 | $skip_next-- and next |
649 | 0 | 28 | $skip_next-- and next |
691 | 0 | 30 | $skip_next-- and next |
738 | 0 | 4 | $skip_next-- and next |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
330 | 64 | 45 | 17 | $want & 2 and $string =~ /$self->{'mre_operator'}/cg |
45 | 50 | 14 | $want & 4 and $string =~ /$self->{'mre_open_paren'}/cg | |
81 | 0 | 14 | $want & 8 and $string =~ /$self->{'mre_close_paren'}/cg | |
31 | 2 | 48 | $want & 1 and $string =~ /$self->{'mre_operand'}/cg | |
0 | 0 | 33 | $want & 16 and $string =~ /\G\s*$/cig | |
367 | 0 | 0 | 33 | $last and $want & $last |
586 | 4 | 2 | 2 | ref $tmp eq 'ARRAY' and not @$tmp |
603 | 18 | 15 | 1 | @res == 1 and ref $res[0] eq 'ARRAY' |
654 | 32 | 18 | 14 | $res and $ea eq $self->{'operators'}[1] |
18 | 18 | 14 | not $res and $ea eq $self->{'operators'}[0] | |
667 | 0 | 8 | 10 | $res &&= $cur |
696 | 27 | 11 | 10 | $res and $ea eq $self->{'operators'}[1] |
11 | 16 | 11 | not $res and $ea eq $self->{'operators'}[0] | |
711 | 0 | 4 | 4 | $res &&= $cur |
744 | 4 | 2 | 2 | $last and $ea eq $self->{'operators'}[1] |
2 | 2 | 2 | not $last and $ea eq $self->{'operators'}[0] | |
754 | 0 | 0 | 0 | ref $last and @$last == 1 |
line | l | !l | condition |
---|---|---|---|
707 | 8 | 50 | $res ||= 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
121 | 0 | 9 | 0 | ref $proto || $proto |
256 | 0 | 0 | 0 | $arg{'operand_cb'} or $arg{'error_cb'} |
586 | 0 | 2 | 6 | not $tmp or ref $tmp eq 'ARRAY' and not @$tmp |
654 | 14 | 19 | 31 | $res and $ea eq $self->{'operators'}[1] or not $res and $ea eq $self->{'operators'}[0] |
665 | 0 | 33 | 35 | $res ||= $cur |
696 | 10 | 16 | 22 | $res and $ea eq $self->{'operators'}[1] or not $res and $ea eq $self->{'operators'}[0] |
709 | 0 | 25 | 25 | $res ||= $cur |
744 | 2 | 2 | 4 | $last and $ea eq $self->{'operators'}[1] or not $last and $ea eq $self->{'operators'}[0] |