line |
true |
false |
branch |
77
|
2 |
2 |
unless ($prev and $prev->{'indices'}[1] > $entity->{'indices'}[0]) |
93
|
1 |
10 |
unless $text =~ /\$/ |
118
|
1 |
84 |
unless $text =~ /[#\x{ff03}]/ |
120
|
83 |
1 |
unless exists $options->{'check_url_overlap'} |
130
|
149 |
2 |
unless ($after =~ /$Twitter::Text::Regexp::end_hashtag_match/) |
138
|
83 |
1 |
if ($options->{'check_url_overlap'}) |
141
|
1 |
82 |
if (@$urls) |
161
|
1 |
31 |
unless $text |
166
|
1 |
31 |
if length $mention_or_list->{'list_slug'} |
179
|
1 |
36 |
unless $text =~ /[\@\x{ff20}]/ |
186
|
4 |
38 |
defined $list_slug ? : |
189
|
38 |
4 |
unless ($after =~ /$Twitter::Text::Regexp::end_mention_match/) |
212
|
1811 |
1 |
$options->{'extract_url_without_protocol'} ? : |
|
106 |
1707 |
unless $text and $options->{'extract_url_without_protocol'} ? $text =~ /\./ : $text =~ /:/ |
224
|
59 |
1706 |
if (not $protocol) { } |
225
|
15 |
44 |
if not $options->{'extract_url_without_protocol'} or $before =~ /$Twitter::Text::Regexp::invalid_url_without_protocol_preceding_chars/ |
230
|
2 |
53 |
unless _is_valid_domain(length $url, $ascii_domain, $protocol) |
239
|
2 |
42 |
unless $last_url |
242
|
15 |
27 |
if ($path) |
250
|
15 |
1691 |
if ($url =~ /($Twitter::Text::Regexp::valid_tco_url)/) |
251
|
1 |
14 |
if $2 and length $2 >= 40 |
256
|
10 |
1695 |
unless _is_valid_domain(length $url, $domain, $protocol) |
271
|
0 |
1760 |
unless $domain |
276
|
12 |
1748 |
if ($@) |
280
|
168 |
1580 |
if $updated_domain_length > $original_domain_length |
281
|
53 |
1695 |
unless $protocol |
298
|
1 |
7 |
unless length $hashtag |
311
|
2 |
31 |
exists $opts{'unicode_domains'} ? : |
312
|
6 |
27 |
exists $opts{'require_protocol'} ? : |
314
|
2 |
31 |
unless $url |
317
|
0 |
31 |
unless $url_parts and $url_parts eq $url |
320
|
1 |
28 |
unless !$require_protocol || _valid_match($scheme, $Twitter::Text::Regexp::validate_url_scheme) && $scheme =~ /\Ahttps?\Z/i and _valid_match($path, $Twitter::Text::Regexp::validate_url_path) and _valid_match($query, $Twitter::Text::Regexp::validate_url_query, 1) and _valid_match($fragment, $Twitter::Text::Regexp::validate_url_fragment, 1) |
331
|
84 |
58 |
unless $optional |
338
|
1 |
4 |
unless $username |
353
|
1 |
51 |
unless length $normalized_text > 0 |
363
|
24 |
27 |
$config->{'emojiParsingEnabled'} ? : |
376
|
37 |
26212 |
if ($url_entity->{'indices'}[0] == $offset) |
382
|
31 |
6 |
if ($weighted_count <= $scaled_max_weighted_tweet_length) |
391
|
318 |
22649 |
if ($emoji_entity->{'indices'}[0] == $offset) |
397
|
298 |
20 |
if ($weighted_count <= $scaled_max_weighted_tweet_length) |
405
|
355 |
28985 |
if $entity_length > 0 |
407
|
28985 |
0 |
if ($offset < length $normalized_text) |
414
|
26811 |
5762 |
if ($range_start <= $chr and $chr <= $range_end) |
422
|
28981 |
4 |
unless $has_invalid_chars |
427
|
5190 |
23795 |
if (not $has_invalid_chars and $weighted_count <= $scaled_max_weighted_tweet_length) |
439
|
30 |
21 |
$is_valid ? : |
465
|
3 |
28978 |
if not $text or length $text == 0 |