| blib/lib/PPI/Token/Operator.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 14 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 64 | 6 | 51184 | if (length $content < 4 and $content . substr($t->{'line'}, $t->{'line_cursor'}, 4 - length($content)) eq "<<>>") |
| 68 | 12504 | 38680 | if $PPI::Token::Operator::OPERATOR{$content . $char} |
| 71 | 1457 | 37223 | if ($content eq ".") |
| 72 | 291 | 1166 | if ($char =~ /^[0-9]$/) |
| 80 | 1040 | 37349 | if ($content eq "<<") |
| 86 | 720 | 320 | if ($t->{'line'} =~ /\G ~? (?: (?!\d)\w | \s*['"`] | \\\w ) /cgx) |
| 95 | 86 | 37583 | if $content eq "<>" or $content eq "<<>>" |