| line | % | coverage | branch |
|---|
| 21 | 100 | T | F | unless $record =~ /\b$field:\s*(\d+)/u |
| 27 | 50 | T | F | unless $record =~ /\b$field: \[([^\]]+)\]/u |
| 34 | 50 | T | F | unless $next and $next < $value |
| 44 | 100 | T | F | if (defined $CheckSpelling::SpellingCollator::expected{$item}) { } |
| 100 | T | F | elsif ($item =~ /^([A-Z])(.*)/u) { } |
| 46 | 100 | T | F | if $value < $next |
| 49 | 100 | T | F | if (defined $CheckSpelling::SpellingCollator::expected{$item}) { } |
| 54 | 100 | T | F | if (defined $CheckSpelling::SpellingCollator::expected{$item}) |
| 60 | 100 | T | F | unless defined $next |
| 67 | 100 | T | F | if expect_item($word, 1) |
| 69 | 50 | T | F | if expect_item($key, 2) |
| 70 | 100 | T | F | if ($key =~ /.s$/u) { } |
| 100 | T | F | elsif ($key =~ /^(.+[^aeiou])ed$/u) { } |
| 100 | T | F | elsif ($key =~ /^(.+)'[ds]$/u) { } |
| 71 | 100 | T | F | if ($key =~ /ies$/u) { } |
| 83 | 50 | T | F | if expect_item($key, 3) |
| 89 | 100 | T | F | if ($warning =~ /\(([-\w]+)\)$/u) |
| 91 | 50 | T | F | if CheckSpelling::Util::is_ignoring_event($code) |
| 98 | 50 | T | F | unless $warning =~ /\(([-\w]+)\)$/u |
| 100 | 100 | T | F | if CheckSpelling::Util::is_ignoring_event($code) |
| 109 | 50 | T | F | if should_skip_warning($warning) |
| 110 | 100 | T | F | if skip_item($item) |
| 113 | 100 | T | F | if (defined $seen_count) |
| 114 | 100 | T | F | if (not defined $unknown_word_limit or $seen_count++ < $unknown_word_limit) { } |
| 130 | 50 | T | F | if $CheckSpelling::SpellingCollator::disable_word_collating |
| 132 | 100 | T | F | unless defined $CheckSpelling::SpellingCollator::shortest_word |
| 135 | 100 | T | F | if ($key =~ /.s$/u) { } |
| 100 | T | F | elsif ($key_length > $CheckSpelling::SpellingCollator::shortest_word + 1 and $key =~ /.[^aeiou]ed$/u) { } |
| 136 | 100 | T | F | if ($key_length > $CheckSpelling::SpellingCollator::shortest_word + 1 and $key =~ /ies$/u) { } |
| 100 | T | F | elsif ($key_length > $CheckSpelling::SpellingCollator::shortest_word and not $key =~ /ies$/u) { } |
| 151 | 100 | T | F | if ($CheckSpelling::SpellingCollator::disable_word_collating) { } |
| 168 | 50 | T | F | if (open EXPECT, "<:utf8", $expect) |
| 185 | 100 | T | F | unless defined $CheckSpelling::SpellingCollator::letter_map{$char}{$key} |
| 187 | 100 | T | F | if defined $word_map{$word} |
| 189 | 50 | T | F | if $words > 2 |
| 190 | 100 | T | F | if ($word eq $key) |
| 191 | 50 | T | F | if $words > 1 |
| 200 | 100 | T | F | if $CheckSpelling::SpellingCollator::disable_word_collating |
| 206 | 100 | T | F | if $key eq $plural_key |
| 207 | 100 | T | F | unless defined $CheckSpelling::SpellingCollator::letter_map{$char}{$key} |
| 221 | 100 | T | F | if ($warning =~ /\(([-\w]+)\)$/u) |
| 223 | 100 | T | F | if CheckSpelling::Util::is_ignoring_event($code) |
| 238 | 50 | T | F | unless defined $ENV{$path} |
| 240 | 50 | T | F | unless open ITEMS, "<:utf8", $1 |
| 246 | 100 | T | F | if ($pattern =~ /^#/u) |
| 247 | 50 | T | F | if ($pattern =~ /^# /u) { } |
| 255 | 100 | T | F | unless ($pattern =~ /./u) |
| 268 | 100 | T | F | unless @{$totals;} |
| 269 | 50 | T | F | unless open my $fh, ">:utf8", $path |
| 272 | 100 | T | F | if ($file_counts) { } |
| 274 | 0 | T | F | unless $totals->[$b] <=> $totals->[$a] |
| 283 | 50 | T | F | unless $totals->[$i] > 0 |
| 286 | 50 | T | F | if ($rule_with_context =~ /^(.*\n)([^\n]+)$/su) { } |
| 291 | 100 | T | F | $file_counts ? : |
| 303 | 100 | T | F | if $file eq $special->{'file_list'} |
| 304 | 100 | T | F | if $file eq $special->{'pr_title_file'} |
| 305 | 100 | T | F | if $file eq $special->{'pr_description_file'} |
| 306 | 100 | T | F | unless rindex $file, $special->{'commit_messages'} |
| 346 | 50 | T | F | if ($timing_report) |
| 365 | 50 | T | F | unless $directory =~ /^(.*)$/u |
| 367 | 100 | T | F | unless (-e $directory) |
| 371 | 100 | T | F | unless (-d $directory) |
| 377 | 100 | T | F | unless open NAME, "<:utf8", "$directory/name" |
| 386 | 50 | T | F | if ($timing_report) |
| 390 | 100 | T | F | if (-e "$directory/skipped") |
| 399 | 50 | T | F | if $timing_report |
| 404 | 100 | T | F | unless (-s "$directory/stats") |
| 405 | 50 | T | F | if $timing_report |
| 410 | 100 | T | F | if ($file eq $file_list) |
| 431 | 100 | T | F | if (@candidate_totals) |
| 434 | 50 | T | F | if (@candidate_list) |
| 437 | 50 | T | F | if ($hits) |
| 439 | 50 | T | F | if ($candidate_file_counts[$i]++ < $candidate_example_limit) |
| 445 | 50 | T | F | if ($candidates[$i] =~ /^#\s+(\S.+)/u) |
| 454 | 100 | T | F | if (@forbidden_totals) |
| 457 | 50 | T | F | if (@forbidden_list) |
| 460 | 50 | T | F | if ($hits) |
| 469 | 50 | T | F | if $timing_report |
| 472 | 100 | T | F | if ($unknown > $unique) |
| 476 | 50 | T | F | unless ($disable_noisy_file) |
| 477 | 50 | T | F | if ($kind eq "file") |
| 489 | 100 | T | F | unless ($kind =~ /^file/u and -s "$directory/unknown") |
| 495 | 100 | T | F | unless $token =~ /./u |
| 497 | 100 | T | F | unless defined $CheckSpelling::SpellingCollator::letter_map{$char} |
| 499 | 100 | T | F | if defined $CheckSpelling::SpellingCollator::letter_map{$char}{$key} |
| 506 | 50 | T | F | if $timing_report |
| 525 | 50 | T | F | if ($context =~ /^(.*?)$(.*)/msu) |
| 527 | 50 | T | F | if $details |
| 529 | 50 | T | F | unless $context |
| 539 | 100 | T | F | if (defined $ENV{'expect'}) |
| 549 | 100 | T | F | if (-s $early_warnings) |
| 553 | 50 | T | F | if should_skip_warning_while_counting($warning) |
| 562 | 100 | T | F | unless -s "$directory/warnings" |
| 563 | 50 | T | F | unless open NAME, "<:utf8", "$directory/name" |
| 568 | 100 | T | F | if ($kind ne 'file-list') { } |
| 572 | 100 | T | F | if ($warning =~ /:(\d+):(\d+ \.\.\. \d+): `(.*)`/u) { } |
| 576 | 100 | T | F | unless $kind eq "file" |
| 578 | 100 | T | F | if log_skip_item($item, $file, $warning, $unknown_word_limit) |
| 579 | 50 | T | F | if $kind ne "file" |
| 582 | 50 | T | F | if ($warning =~ /\`(.*?)\` in line \(token-is-substring\)/u) |
| 583 | 0 | T | F | if skip_item($1) |
| 587 | 50 | T | F | if should_skip_warning($warning, $code) |
| 593 | 50 | T | F | unless $warning =~ s/^:(\d+)/:1/u |
| 595 | 100 | T | F | if ($warning =~ /:(\d+ \.\.\. \d+): `(.*)`/u) |
| 599 | 50 | T | F | if skip_item($item) |
| 600 | 50 | T | F | if (defined $unknown_file_word_limit) |
| 601 | 100 | T | F | if ++$unknown_file_word_count{$item} > $unknown_file_word_limit |
| 604 | 100 | T | F | if should_skip_warning_while_counting($warning) |
| 613 | 50 | T | F | if should_skip_warning_while_counting($warning) |
| 616 | 100 | T | F | if (defined $unknown_word_limit) |
| 619 | 50 | T | F | unless $warning_count >= $unknown_word_limit |
| 622 | 0 | T | F | if should_skip_warning_while_counting($warning) |
| 628 | 100 | T | F | if (%counters) |
| 644 | 100 | T | F | if (scalar @words > 1) { } |
| 645 | 50 | T | F | unless length $a <=> length $b |
| 661 | 100 | T | F | unless /(.*) \((.*)\)/u |
| 664 | 100 | T | F | if ($variant eq $key) { } |
| 675 | 100 | T | F | if ($_ =~ /$pattern/u) { } |
| 680 | 50 | T | F | if (defined $has_canonincal{$canonical_match}) { } |
| 681 | 100 | T | F | if s/not a recognized word/ignored because another more general variant ($wrapped) is also in expect/u |
| 682 | 100 | T | F | if s/unrecognized-spelling/ignored-expect-variant/u |
| 684 | 0 | T | F | if s/is not a recognized word/should be replaced by the more general variant ($wrapped)/u |
| 685 | 0 | T | F | if s/unrecognized-spelling/update-expect-variant/u |
| 687 | 100 | T | F | unless $print |
| 689 | 100 | T | F | unless /\(((?:\w+-)+\w+)\)$/u |
| 690 | 100 | T | F | if $1 eq "unrecognized-spelling" |