| blib/lib/Perl/Critic/Policy/InputOutput/ProhibitBarewordFileHandles.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 404 | 28 | unless $OPEN_FUNCS{$elem->content} |
| 34 | 1 | 27 | unless is_function_call($elem) |
| 37 | 1 | 26 | unless $first_arg |
| 41 | 0 | 26 | if ('PPI::Statement::Scheduled' eq ref $first_arg) { } |
| 26 | 0 | elsif ($ARRAY_REF eq ref $first_arg) { } | |
| 53 | 0 | 26 | unless $first_token |
| 55 | 22 | 4 | if ($first_token->isa("PPI::Token::Word")) |
| 56 | 11 | 11 | if ($first_token ne "my" and not $first_token =~ /^STD(?:IN|OUT|ERR)$/msx) |