blib/lib/Perl/Critic/Policy/Miscellanea/TextDomainPlaceholders.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 31 | 45 | 68.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
157 | 0 | 25 | 27 | @$arg == 1 and $arg->[0]->isa('PPI::Token::Word') |
208 | 0 | 4 | 64 | $next = $elem->snext_sibling and $next->isa('PPI::Token::Operator') |
4 | 0 | 64 | $next = $elem->snext_sibling and $next->isa('PPI::Token::Operator') and $next eq '=>' | |
242 | 0 | 0 | 12 | $op->isa('PPI::Token::Operator') and $op eq '.' |
296 | 110 | 0 | 2 | $e->isa('PPI::Token::Comment') and $e->content =~ /$line_directive_re/ |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
87 | 3 | 5 | 9 | not $count_arg or do { |
93 | 5 | 3 | 0 | $count_arg->[0] || $elem |
107 | 2 | 6 | 30 | $args_any_vars ||= $any_vars |
122 | 0 | 3 | 56 | $format_any_vars ||= $any_vars |
129 | 8 | 21 | 21 | $args_any_vars or exists $arg_keys{$format_key} |
130 | 21 | 0 | 0 | $format_arg->[0] || $elem |
142 | 13 | 0 | 0 | $arg->[0] || $elem |
182 | 21 | 1 | 63 | $elem->isa('PPI::Token::Quote::Double') or $elem->isa('PPI::Token::Quote::Interpolate') |
186 | 0 | 4 | 18 | $any_vars ||= _string_any_vars($str) |
197 | 0 | 1 | 2 | $any_vars ||= _string_any_vars($str) |