| line |
true |
false |
branch |
|
73
|
0 |
0 |
if ref $class |
|
108
|
0 |
0 |
unless defined $params |
|
124
|
0 |
0 |
if (defined $debugoption) |
|
125
|
0 |
0 |
if (defined $diroption) |
|
126
|
0 |
0 |
if (defined $indexoption) |
|
127
|
0 |
0 |
if (defined $stopwordoption) |
|
128
|
0 |
0 |
if (defined $iscuioption) |
|
129
|
0 |
0 |
if (defined $sparsematrixoption) |
|
130
|
0 |
0 |
if (defined $prefixoption) |
|
131
|
0 |
0 |
if (defined $suffixoption) |
|
132
|
0 |
0 |
if (defined $wcsoption) |
|
133
|
0 |
0 |
if (defined $bucketsNumoption) |
|
134
|
0 |
0 |
if (defined $ftsoption) |
|
166
|
0 |
0 |
unless open $FILE, "$program_dir/$file" |
|
311
|
0 |
0 |
if ($charact) { } |
|
312
|
0 |
0 |
if ($word eq '') { } |
|
319
|
0 |
0 |
if ($word eq "") { } |
|
397
|
0 |
0 |
unless open $META, '<', "$program_dir/$subdir/" . $name . '_meta' |
|
428
|
0 |
0 |
if ($charact) { } |
|
429
|
0 |
0 |
if ($word =~ //) { } |
|
436
|
0 |
0 |
if ($word =~ //g) { } |
|
493
|
0 |
0 |
if ($tokenText =~ /\d+\s\.\s\d+/o) |
|
498
|
0 |
0 |
if ($tokenText =~ /\w+\s\\\'\s\w+/o) |
|
502
|
0 |
0 |
if ($tokenText =~ /[^a-zA-Z0-9]/o) |
|
552
|
0 |
0 |
if ($uniSub->inArr($word, \@txtTokens)) { } |
|
603
|
0 |
0 |
if ($type eq 'sem') { } |
|
|
0 |
0 |
elsif ($type eq 'cui') { } |
|
|
0 |
0 |
elsif ($type eq 'text') { } |
|
632
|
0 |
0 |
if ($type eq 'pos') { } |
|
|
0 |
0 |
elsif ($type eq 'sem' or $type eq 'cui') { } |
|
637
|
0 |
0 |
if ($tokenTxt eq $word) |
|
649
|
0 |
0 |
if ($name eq $word) |
|
650
|
0 |
0 |
if ($type eq 'sem') { } |
|
|
0 |
0 |
elsif ($type eq 'cui') { } |
|
693
|
0 |
0 |
if ($bucketId == $bucketNum) { } |
|
725
|
0 |
0 |
if (defined $stopwords_file) |
|
738
|
0 |
0 |
if ($wcs) |
|
752
|
0 |
0 |
if ($wcs and not $wcs_found and $abbrev ne $wcs_feature) |
|
759
|
0 |
0 |
if ($wcs and not $wcs_found and $bucket != $wcs_bucket) { } |
|
772
|
0 |
0 |
if ($curItem eq 'ortho') { } |
|
820
|
0 |
0 |
if ($curItem eq 'ortho') { } |
|
873
|
0 |
0 |
if ($program_dir ne '') { } |
|
878
|
0 |
0 |
unless open $ARFF, '>', "$program_dir/$subdir/$arffdir/$featdir/$typeDir/" . $name . "_$type-" . $bucket . '.arff' |
|
883
|
0 |
0 |
unless open $ARFF, '>', "$arffdir/$featdir/$typeDir/" . $name . "_$type-" . $bucket . '.arff' |
|
949
|
0 |
0 |
if (length $word > 8) |
|
953
|
0 |
0 |
if ($word =~ /$entId/o) { } |
|
964
|
0 |
0 |
if ($stopwords_file and $word =~ /$stopRegex/o or $is_cui and $word_cuis[0] eq '' or ($word eq '.' or $word eq ',')) |
|
969
|
0 |
0 |
if ($a > 0) |
|
970
|
0 |
0 |
if ($a < $wordLen - 1) |
|
983
|
0 |
0 |
if ($item eq 'ortho') { } |
|
|
0 |
0 |
elsif ($item eq 'morph') { } |
|
|
0 |
0 |
elsif ($item eq 'text') { } |
|
|
0 |
0 |
elsif ($item eq 'pos') { } |
|
|
0 |
0 |
elsif ($item eq 'cui') { } |
|
|
0 |
0 |
elsif ($item eq 'sem') { } |
|
996
|
0 |
0 |
if ($sparse_matrix) |
|
1003
|
0 |
0 |
$wordOrig =~ /\b[\S]+(_e)\b/ ? : |
|
1006
|
0 |
0 |
if ($sparse_matrix) |
|
1013
|
0 |
0 |
if ($word ne '') |
|
1033
|
0 |
0 |
$word =~ /\b([A-Z])\w+\b/go ? : |
|
1037
|
0 |
0 |
length $word == 1 ? : |
|
1041
|
0 |
0 |
$word =~ /\b[A-Z]+\b/go ? : |
|
1045
|
0 |
0 |
$word =~ /[0-9]+/go ? : |
|
1049
|
0 |
0 |
$word =~ /\b[0-9]+\b/go ? : |
|
1053
|
0 |
0 |
$word =~ /-/go ? : |
|
1057
|
0 |
0 |
$word =~ /[^a-zA-Z0-9\s]/go ? : |
|
1078
|
0 |
0 |
if ($a eq $preWord) { } |
|
|
0 |
0 |
elsif ($a eq $sufWord) { } |
|
1115
|
0 |
0 |
$w eq $a ? : |
|
1116
|
0 |
0 |
$pw eq $a || $nw eq $a ? : |
|
1151
|
0 |
0 |
$w eq $a ? : |
|
1152
|
0 |
0 |
$pw eq $a || $nw eq $a ? : |
|
1186
|
0 |
0 |
$uniSub->inArr($a, \@wArr) ? : |
|
1187
|
0 |
0 |
$uniSub->inArr($a, \@pwArr) || $uniSub->inArr($a, \@nwArr) ? : |
|
1225
|
0 |
0 |
$uniSub->inArr($a, \@wArr) ? : |
|
1226
|
0 |
0 |
$uniSub->inArr($a, \@pwArr) || $uniSub->inArr($a, \@nwArr) ? : |
|
1242
|
0 |
0 |
if ($curVal eq '1') |
|
1266
|
0 |
0 |
if ($feature eq 'ortho') { } |
|
|
0 |
0 |
elsif ($feature eq 'morph') { } |
|
1339
|
0 |
0 |
unless ($uniSub->inArr($t, \@new_arr) or $t =~ /\s+/o or $t =~ /\b$entId\b/o or length $t == 0) |
|
1363
|
0 |
0 |
if ($uniSub->inArr($bucket, \@bucketRange)) |
|
1377
|
0 |
0 |
if ($type eq 'sem') { } |
|
|
0 |
0 |
elsif ($type eq 'cui') { } |
|
1390
|
0 |
0 |
if ($type eq 'text' or $type eq 'pos') { } |
|
|
0 |
0 |
elsif ($type eq 'sem' or $type eq 'cui') { } |
|
1396
|
0 |
0 |
if ($tokenText =~ /\w+\s\w+/o) { } |
|
|
0 |
0 |
elsif ($tokenText ne '.' and $tokenText ne '-' and not $tokenText =~ /[^a-zA-Z0-9]/) { } |
|
1410
|
0 |
0 |
if ($type eq 'text') { } |
|
|
0 |
0 |
elsif ($type eq 'pos') { } |
|
1427
|
0 |
0 |
if ($type eq 'sem') |
|
1452
|
0 |
0 |
if ($f eq 'pos') |
|
1459
|
0 |
0 |
unless ($uniSub->inArr($word, \@attrDelux)) |
|
1483
|
0 |
0 |
if ($uniSub->inArr($bucket, \@bucketRange)) |
|
1490
|
0 |
0 |
if ($type eq 'text') { } |
|
|
0 |
0 |
elsif ($type eq 'pos') { } |
|
|
0 |
0 |
elsif ($type eq 'sem') { } |
|
|
0 |
0 |
elsif ($type eq 'cui') { } |
|
1531
|
0 |
0 |
if ($uniSub->inArr($bucket, \@bucketRange)) |
|
1589
|
0 |
0 |
unless open STP, $stopfile |
|
1595
|
0 |
0 |
if (/\@stop.mode\s*=\s*(\w+)\s*$/) |
|
1597
|
0 |
0 |
unless ($stop_mode =~ /^(AND|and|OR|or)$/) |
|
1609
|
0 |
0 |
if (/^\s*$/) |
|
1612
|
0 |
0 |
unless (m[^/]) |
|
1616
|
0 |
0 |
unless (m[/$]) |
|
1629
|
0 |
0 |
if (length $stop_regex <= 0) |
|
1637
|
0 |
0 |
unless (defined $stop_mode) |