line | % | coverage | branch |
23 | 100 | T | F | @keys ? : |
28 | 100 | T | F | @keys ? : |
33 | 100 | T | F | @_ ? : |
37 | 100 | T | F | @{(shift())->want_fields;} ? : |
41 | 100 | T | F | @{(shift())->ignore_fields;} ? : |
51 | 100 | T | F | if ($has_wants) |
56 | 100 | T | F | if ($has_ignores) |
61 | 100 | T | F | if ($self->ordered) |
66 | 100 | T | F | if $has_ignores and $ignores{$$_[0]} |
67 | 100 | T | F | if $has_wants and not $wants{$$_[0]} |
76 | 100 | T | F | $$opt{'utf8'} ? : |
| 100 | T | F | unless my $fh = 'IO::File'->new($path, $$opt{'utf8'} ? '<:utf8' : 'r') |
93 | 50 | T | F | $$opt{'utf8'} ? : |
| 50 | T | F | unless my $fh = 'IO::File'->new($path, $$opt{'utf8'} ? '<:utf8' : 'r') |