| line |
true |
false |
branch |
|
24
|
13 |
4 |
if (defined $filename) |
|
25
|
13 |
0 |
if (ref $filename eq '') { } |
|
|
0 |
0 |
elsif (ref $filename eq 'ARRAY') { } |
|
38
|
0 |
13 |
unless open FILE, $textFilename |
|
62
|
13 |
4 |
if (defined $filename) |
|
63
|
13 |
0 |
if (ref $filename eq '') { } |
|
|
0 |
0 |
elsif (ref $filename eq 'ARRAY') { } |
|
75
|
3 |
3 |
if (@_) |
|
85
|
1 |
6 |
if (@_) |
|
93
|
16 |
3 |
if (@_) |
|
95
|
13 |
3 |
if ($arg =~ /^\d+$/) { } |
|
107
|
0 |
3943 |
if (@_) |
|
123
|
446 |
0 |
if (@_) |
|
127
|
376 |
70 |
if ($self->_maxTermId < $self->_terms->{$id}{'numId'}) |
|
138
|
376 |
451 |
if (@_) |
|
148
|
1330 |
0 |
if (defined $id and exists $self->_terms->{$id}) |
|
156
|
0 |
726 |
if (@_) |
|
171
|
70 |
0 |
if (@_) |
|
176
|
61 |
9 |
if ($self->_maxRelationId < $self->_relations->{$id}{'numId'}) |
|
187
|
61 |
75 |
if (@_) |
|
197
|
255 |
0 |
if (defined $id and exists $self->_relations->{$id}) |
|
205
|
0 |
69 |
if (@_) |
|
220
|
10 |
0 |
if (@_) |
|
224
|
10 |
0 |
if ($self->_maxAttributeId < $self->_attributes->{$id}{'numId'}) |
|
235
|
10 |
15 |
if (@_) |
|
245
|
17 |
0 |
if (defined $id and exists $self->_attributes->{$id}) |
|
268
|
0 |
13 |
unless open FILE, '<:utf8', $self->_annotationFilename(0) |
|
276
|
363 |
66 |
if ($id =~ /^T(?\d+)/) |
|
280
|
363 |
0 |
if ($info =~ /^(?[^ ]+) (?.*)/) |
|
300
|
8 |
421 |
if ($id =~ /^A(?\d+)/) |
|
314
|
58 |
371 |
if ($id =~ /^R(?\d+)/) |
|
342
|
0 |
0 |
if ($filename eq '-') { } |
|
345
|
0 |
0 |
if (defined $addmode) { } |
|
346
|
0 |
0 |
unless open $fh, '>>:utf8', $filename |
|
348
|
0 |
0 |
unless open $fh, '>:utf8', $filename |
|
354
|
0 |
0 |
if ($filename ne '-') |
|
398
|
0 |
0 |
if ($filename eq '-') { } |
|
402
|
0 |
0 |
if (defined $addmode) { } |
|
403
|
0 |
0 |
unless open $fh, '>>:utf8', $filename |
|
405
|
0 |
0 |
unless open $fh, '>:utf8', $filename |
|
413
|
0 |
0 |
if ($filename ne '-') |
|
436
|
0 |
0 |
if ($filename eq '-') { } |
|
439
|
0 |
0 |
if (defined $addmode) { } |
|
440
|
0 |
0 |
unless open $fh, '>>:utf8', $filename |
|
442
|
0 |
0 |
unless open $fh, '>:utf8', $filename |
|
446
|
0 |
0 |
if ($filename ne '-') |
|
516
|
0 |
0 |
if ($filename eq '-') { } |
|
519
|
0 |
0 |
if (defined $addmode) { } |
|
520
|
0 |
0 |
unless open $fh, '>>:utf8', $textFilename |
|
522
|
0 |
0 |
unless open $fh, '>:utf8', $textFilename |
|
526
|
0 |
0 |
unless open FILE, $file |
|
532
|
0 |
0 |
if ($filename ne '-') |
|
537
|
0 |
0 |
if ($filename eq '-') { } |
|
540
|
0 |
0 |
if (defined $addmode) { } |
|
541
|
0 |
0 |
unless open $fh, '>>:utf8', $annotationFilename |
|
543
|
0 |
0 |
unless open $fh, '>:utf8', $annotationFilename |
|
547
|
0 |
0 |
if ($filename ne '-') |