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 "<<>>" |