| blib/lib/Perl/Critic/Policy/BuiltinFunctions/ProhibitUselessTopic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 20 | 35.0 |
| line | true | false | branch |
|---|---|---|---|
| 52 | 451 | 12 | unless exists $APPLIES_TO{$elem->content} |
| 57 | 0 | 12 | if ($FILETEST_OPERATORS{$content}) |
| 60 | 0 | 0 | if ($op_node and $op_node->isa("PPI::Token::Magic")) |
| 62 | 0 | 0 | if ($op eq "\$_") |
| 69 | 12 | 0 | if ($TOPICAL_FUNCS{$content} and is_perl_builtin($elem)) |
| 75 | 0 | 12 | if ($is_split) { } |
| 76 | 0 | 0 | if @args != 2 |
| 83 | 12 | 0 | if (@args == $nth_arg_for_topic) |
| 86 | 0 | 12 | if (@tokens == 1 and $tokens[0]->content eq "\$_") |
| 87 | 0 | 0 | $is_split ? : |