Condition Coverage

blib/lib/Perl/Lint/Policy/InputOutput/ProhibitTwoArgOpen.pm
Criterion Covered Total %
condition 36 42 85.7


and 3 conditions

line !l l&&!r l&&r condition
21 54 14 55 $token_type == 70 and $token_data eq 'open'
46 39 3 104 $token_type != 104 and $token_type != 146
42 3 101 $token_type != 104 and $token_type != 146 and $token_type != 145
6 12 89 $token_type != 104 and $token_type != 146 and $token_type != 145 and $token_type != 151
15 6 83 $token_type != 104 and $token_type != 146 and $token_type != 145 and $token_type != 151 and $token_kind != 3
64 0 16 0 $second and $second eq '-|' || $second eq '|-' || $second =~ /STD(?:OUT|ERR|IN)\Z/
88 31 4 80 $token_type != 104 and $token_type != 146
35 4 76 $token_type != 104 and $token_type != 146 and $token_type != 145
8 16 60 $token_type != 104 and $token_type != 146 and $token_type != 145 and $token_type != 151
20 5 55 $token_type != 104 and $token_type != 146 and $token_type != 145 and $token_type != 151 and $token_kind != 3
103 0 17 0 $second and $second eq '-|' || $second eq '|-' || $second =~ /STD(?:OUT|ERR|IN)\Z/

or 3 conditions

line l !l&&r !l&&!r condition
64 0 4 12 $second eq '-|' || $second eq '|-' || $second =~ /STD(?:OUT|ERR|IN)\Z/
88 18 6 115 $token_kind == 21 or $token_kind == 1
103 5 0 12 $second eq '-|' || $second eq '|-' || $second =~ /STD(?:OUT|ERR|IN)\Z/