| line |
true |
false |
branch |
|
25
|
0 |
0 |
unless defined $options |
|
27
|
0 |
0 |
unless defined $$options{'threshold'} |
|
37
|
6 |
0 |
unless defined $options |
|
61
|
158 |
6 |
$i ? : |
|
75
|
0 |
164 |
unless defined $coeff |
|
77
|
0 |
164 |
if ($$options{'want_tokens'}) { } |
|
80
|
0 |
0 |
if ($coeff >= $$options{'threshold'} or $$ctx{'pos'} == $#{$chars;}) |
|
86
|
0 |
0 |
if $token |
|
91
|
29 |
135 |
if ($coeff) |
|
104
|
6 |
158 |
if ($$ctx{'nextchar'} =~ m[([-./?=:&"!+()])] or $$ctx{'char'} =~ m[([-./?=:&"!+()])]) |
|
112
|
6 |
158 |
if (length $spacer) |
|
130
|
49 |
6 |
if ($case1 or $case2) { } |
|
137
|
3 |
46 |
if substr($seq_left, -1) eq $spacer |
|
158
|
3 |
0 |
if ($case1 or $case2) { } |
|
165
|
3 |
0 |
if substr($seq_right, -1) eq $spacer |
|
194
|
0 |
153 |
$spacer_is_hyphen ? : |
|
|
0 |
153 |
$spacer_is_hyphen ? : |
|
|
6 |
147 |
$spacer && !$spacer_is_hyphen ? : |
|
|
6 |
147 |
$spacer && !$spacer_is_hyphen ? : |
|
|
0 |
153 |
$spacer_is_hyphen ? : |
|
|
1 |
152 |
_is_colon($$ctx{'spacer'}) && !!length($$ctx{'seq_right'}) ? : |
|
244
|
5 |
16 |
$_[0] =~ /^[,?!";«»]$/ ? : |
|
246
|
8 |
8 |
$_[0] =~ /^\p{Latin}$/ ? : |
|
248
|
245 |
61 |
$_[0] =~ /^\p{Cyrillic}$/ ? : |
|
250
|
0 |
322 |
$_[0] =~ /^[0-9]$/ ? : |
|
252
|
0 |
8 |
$_[0] =~ /^[\[({<]$/ ? : |
|
254
|
0 |
8 |
$_[0] =~ /^[\])}>]$/ ? : |
|
256
|
0 |
0 |
$_[0] =~ /^(?:\x{442}\x{43e}|\x{442}\x{430}\x{43a}\x{438}|\x{441}|\x{43a}\x{430}|\x{434}\x{435})$/ ? : |
|
258
|
42 |
77 |
$_[0] =~ /^\s$/ ? : |
|
260
|
0 |
302 |
$_[0] eq '-' ? : |
|
262
|
4 |
21 |
$_[0] eq '.' ? : |
|
264
|
0 |
8 |
$_[0] eq q['] ? : |
|
266
|
0 |
8 |
$_[0] eq '/' ? : |
|
268
|
4 |
157 |
$_[0] eq ':' ? : |
|
270
|
2 |
151 |
$_[0] eq $_[1] ? : |
|
272
|
0 |
0 |
$_[0]->in_list($_[1]) ? : |
|
275
|
0 |
0 |
if not $_[1] or substr $_[1], 0, !1 |
|
277
|
0 |
0 |
$_[0]->in_list($_[1]) ? : |
|
283
|
0 |
6 |
if $_[0]->in_list($seq) |
|
285
|
0 |
6 |
unless $seq =~ /^\W|\W$/ |
|
288
|
0 |
6 |
if $_[0]->in_list($seq) |
|
291
|
0 |
9 |
if $_[0]->in_list($seq) |
|
298
|
3 |
3 |
if not length $_[1] |
|
299
|
0 |
3 |
if length $_[0] < 5 |
|
300
|
0 |
3 |
if substr $_[0], 0, !1 |
|
302
|
3 |
0 |
unless $_[0] =~ m[^\W*https?://?] or $_[0] =~ /^\W*www\./ or $_[0] =~ /.\.(?:[a-z]{2,3}|\x{440}\x{443}|\x{440}\x{444})\W*$/i |
|
316
|
1 |
0 |
unless $seq_left =~ /^[0-9]{1,2}$/ and $seq_right =~ /^[0-9]{2}$/ |
|
319
|
0 |
0 |
$seq_left < 24 && $seq_right < 60 ? : |
|
325
|
2 |
6 |
_is_colon($_[0]) ? : |
|
|
0 |
8 |
_is_slash($_[0]) ? : |
|
|
0 |
8 |
_is_single_quote($_[0]) ? : |
|
|
0 |
8 |
_is_bracket2($_[0]) ? : |
|
|
0 |
8 |
_is_bracket1($_[0]) ? : |
|
|
8 |
8 |
_is_latin($_[0]) ? : |
|
|
0 |
16 |
_is_digit($_[0]) ? : |
|
|
0 |
16 |
_is_hyphen($_[0]) ? : |
|
|
5 |
16 |
_is_pmark($_[0]) ? : |
|
|
4 |
21 |
_is_dot($_[0]) ? : |
|
|
36 |
25 |
_is_space($_[0]) ? : |
|
|
245 |
61 |
_is_cyr($_[0]) ? : |