| blib/lib/PPI/Token/Operator.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 14 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 64 | 6 | 50582 | if (length $content < 4 and $content . substr($t->{'line'}, $t->{'line_cursor'}, 4 - length($content)) eq "<<>>") |
| 68 | 12400 | 38182 | if $PPI::Token::Operator::OPERATOR{$content . $char} |
| 71 | 1475 | 36707 | if ($content eq ".") |
| 72 | 295 | 1180 | if ($char =~ /^[0-9]$/) |
| 80 | 1040 | 36847 | if ($content eq "<<") |
| 86 | 717 | 323 | if ($t->{'line'} =~ /\G ~? (?: (?!\d)\w | \s*['"`] | \\\w ) /cgx) |
| 95 | 90 | 37080 | if $content eq "<>" or $content eq "<<>>" |