blib/lib/Perl/Lint/Policy/InputOutput/RequireEncodingWithUTF8Layer.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 8 | 100.0 |
line | true | false | branch |
---|---|---|---|
21 | 90 | 42 | if ($token_type == 70 and $token_data eq 'open' || $token_data eq 'binmode') |
26 | 90 | 408 | if ($token_type == 108 or $token_kind == 21 or $token_kind == 1) { } |
218 | 234 | elsif ($token_type != 104 and $token_type != 146 and $token_type != 145 and $token_type != 151 and $token_type != 107 and $token_kind != 3) { } | |
41 | 38 | 52 | if ($second_arg and $second_arg =~ /utf8\Z/) |