| line |
true |
false |
branch |
|
45
|
1 |
3 |
unless (defined $caseSensitive) |
|
53
|
3 |
1 |
if (defined $lemmatised_corpus_filename) |
|
57
|
3 |
1 |
if (defined $lemmatised_corpus_filename) |
|
61
|
3 |
1 |
if (defined $lemmatised_corpus_filename) |
|
65
|
3 |
1 |
if (defined $lemmatised_corpus_filename) |
|
88
|
1 |
0 |
unless (defined $caseSensitive) |
|
96
|
0 |
1 |
if (defined $lemmatised_corpus_filename) |
|
100
|
0 |
1 |
if (defined $lemmatised_corpus_filename) |
|
104
|
0 |
1 |
if (defined $lemmatised_corpus_filename) |
|
108
|
0 |
1 |
if (defined $lemmatised_corpus_filename) |
|
126
|
0 |
5 |
unless open DESC_TERMLIST, $termlist_name |
|
136
|
35 |
0 |
unless ($line =~ /^\s*\#/o or $line =~ m[^\s*//]o or $line =~ /^\s*$/o) |
|
139
|
35 |
0 |
unless ($tab[0] =~ /^\s*$/) |
|
146
|
35 |
0 |
if (not exists $$ref_termlistIdx{$tab[0]}) { } |
|
168
|
35 |
0 |
if (defined $ref_regex_lemmaWordtermlist) |
|
169
|
0 |
35 |
if (defined $ref_termlist->[$term_counter][3]) { } |
|
190
|
35 |
0 |
if (defined $ref_regex_lemmaWordtermlist) |
|
206
|
5 |
0 |
if (defined $ref_regex_lemmaWordtermlist) |
|
222
|
0 |
8 |
unless open CORPUS, $corpus_filename |
|
258
|
226 |
355 |
if (defined $caseSensitive and $caseSensitive == 0 || length $tab_words_lc[$i] <= $caseSensitive) { } |
|
263
|
520 |
61 |
if ($word ne '') |
|
275
|
388 |
132 |
unless (exists $ref_corpus_index->{$word}) |
|
322
|
0 |
0 |
if ($word ne '' and length $word > 2 || scalar @tab_termlex == 1 and exists $ref_corpus_index->{$word}) |
|
325
|
0 |
0 |
unless (exists $ref_tabh_idtrm_select->{$counter}) |
|
354
|
8 |
0 |
unless (defined $termField) |
|
364
|
56 |
0 |
if (defined $ref_termlist->[$counter][$termField]) { } |
|
366
|
14 |
42 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField] <= $caseSensitive) { } |
|
398
|
102 |
0 |
if ($word ne '') |
|
408
|
55 |
1 |
if ($i == scalar @tab_termlex) |
|
411
|
55 |
47 |
unless (exists $ref_tabh_idtrm_select->{$counter}) |
|
442
|
7 |
0 |
unless (defined $termField) |
|
449
|
0 |
7 |
unless open TAGGEDCORPUS, ">>$offset_tagged_corpus_name" |
|
456
|
48 |
0 |
if (defined $ref_termlist->[$counter][$termField]) |
|
463
|
51 |
25 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\{\}\(\)\[\]\+]($term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]> or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\{\}\(\)\[\]\+]($term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>i) |
|
469
|
4 |
72 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<^($term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>i or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<^($term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>i) |
|
475
|
0 |
76 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]($term_regex)$> or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]($term_regex)$>i) |
|
481
|
0 |
76 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ /^($term_regex)$/i or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ /^($term_regex)$/i) |
|
519
|
0 |
0 |
unless (defined $termField) |
|
532
|
0 |
0 |
if (defined $ref_termlist->[$counter][$termField]) |
|
541
|
0 |
0 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\{\}\(\)\[\]\+](?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\{\}\(\)\[\]\+](?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>is) |
|
547
|
0 |
0 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<^(?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<^(?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>is) |
|
553
|
0 |
0 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+](?$term_regex)$>s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+](?$term_regex)$>is) |
|
559
|
0 |
0 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ /^(?$term_regex)$/s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ /^(?$term_regex)$/is) |
|
591
|
0 |
1 |
unless open TAGGEDCORPUS, ">$offset_tagged_corpus_name" |
|
596
|
1 |
0 |
unless (defined $termField) |
|
609
|
7 |
0 |
if (defined $ref_termlist->[$counter][$termField]) |
|
620
|
7 |
5 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<(?[,.?!:;/ \n\-/\*'\#\{\}\(\)\[\]\+])(?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<(?[,.?!:;/ \n\-/\*'\#\{\}\(\)\[\]\+])(?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>is) |
|
627
|
1 |
11 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<^(?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<^(?$term_regex)[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+]>is) |
|
634
|
0 |
12 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ m<(?[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+])(?$term_regex)$>s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ m<(?[,.?!:;/ \n\-/\*'\#\(\)\[\]\{\}\+])(?$term_regex)$>is) |
|
641
|
0 |
12 |
if (defined $caseSensitive and $caseSensitive == 0 || length $ref_termlist->[$counter][$termField2] <= $caseSensitive and $line =~ /^(?$term_regex)$/s or !defined($caseSensitive) || $caseSensitive < 0 || length $ref_termlist->[$counter][$termField2] > $caseSensitive and $line =~ /^(?$term_regex)$/is) |
|
661
|
4 |
4 |
if (not defined $semtag or $semtag =~ /^\s*$/) |
|
679
|
0 |
0 |
if (ref $ref_tab_results eq 'ARRAY') { } |
|
685
|
0 |
0 |
if (ref $ref_tab_results eq 'HASH') |
|
697
|
0 |
0 |
if (not exists $ref_tab_results->{$tmp_key}) { } |
|
703
|
0 |
0 |
if (defined $tab_tmp[4]) { } |