| line |
true |
false |
branch |
|
103
|
8 |
34723 |
if (not $got_word and $ascii =~ / ^ $Hailo::Tokenizer::Words::RE{'URI'} /ox) { }
|
|
|
313 |
34410 |
elsif (not $got_word and $input =~ s/ ^ (?<word> $CASED_WORD )//ox) { }
|
|
|
26814 |
7596 |
elsif ($input =~ / ^ $WORD /ox) { }
|
|
|
7596 |
0 |
elsif ($input =~ s/ ^ (?<non_word> $NON_WORD ) //ox) { }
|
|
122
|
22606 |
4208 |
@tokens ? :
|
|
123
|
21 |
26793 |
if (not @tokens and $input =~ s/ ^ (?<word>$WORD_APOST) //ox or $last_char =~ / ^ $APOSTROPHE $ /ox and $input =~ s/ ^ (?<word>$WORD_APOST) (?<! $last_char ) //ox) { }
|
|
129
|
26793 |
0 |
if $input =~ s/^($WORD)//o
|
|
133
|
24923 |
73 |
if $word ne uc $word and not $word =~ /$MIXED_CASE/ and not $word =~ /$UPPER_NONW/
|
|
149
|
5646 |
1950 |
if ($got_word) { }
|
|
|
651 |
1299 |
elsif ($input =~ /^$NONSPACE/) { }
|
|
152
|
485 |
5161 |
$input =~ /^$NONSPACE/ ? :
|
|
179
|
9935 |
2482 |
if ($pos != $#{$tokens;} and $spacing != $self->{'_spacing_prefix'} and $spacing != $self->{'_spacing_infix'} and not $pos < $#{$tokens;} && ($$tokens[$pos + 1][0] == $self->{'_spacing_postfix'} || $$tokens[$pos + 1][0] == $self->{'_spacing_infix'}))
|