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