| line |
true |
false |
branch |
|
210
|
1 |
55 |
unless $$dataPt =~ /(\S)/gs |
|
211
|
14 |
41 |
if ($1 eq '(') { } |
|
|
14 |
27 |
elsif ($1 eq ')') { } |
|
|
13 |
14 |
elsif ($1 eq '"') { } |
|
224
|
0 |
16 |
unless $$dataPt =~ /"/gs |
|
227
|
13 |
3 |
unless $tok =~ /(\\+)$/ and length $1 & 1 |
|
234
|
0 |
57 |
unless $esc{$1} |
|
239
|
14 |
0 |
$$dataPt =~ /([^\s()"]+)/gs ? : |
|
241
|
41 |
0 |
if defined $tok |
|
244
|
1 |
14 |
unless $more |
|
245
|
15 |
0 |
@toks ? : |
|
258
|
0 |
1 |
unless $$dataPt =~ /\(\s*(metadata|xmp)[\s("]/s |
|
262
|
0 |
1 |
unless my $toks = &ParseAnt($dataPt) |
|
267
|
0 |
2 |
unless ref $ant eq "ARRAY" and @$ant >= 2 |
|
269
|
0 |
2 |
if ref $tag or not defined $tagTablePtr->{$tag} |
|
270
|
1 |
1 |
if ($tag eq 'metadata') { } |
|
274
|
0 |
1 |
if ref $ant->[0] |
|
290
|
0 |
1 |
unless ref $$dataPt eq "ARRAY" |
|
295
|
0 |
12 |
unless ref $item eq "ARRAY" and @$item >= 2 and not ref $item->[0] and not ref $item->[1] |
|
298
|
0 |
12 |
unless ($$tagTablePtr{$item->[0]}) |
|
301
|
0 |
0 |
unless length $name |
|
306
|
0 |
1 |
if $err |
|
319
|
0 |
1 |
unless (defined $buff) |
|
324
|
0 |
1 |
if ($verbose >= 3) |
|
332
|
0 |
1 |
unless my $processProc = $tagTablePtr->{'PROCESS_PROC'} |