line |
true |
false |
branch |
80
|
0 |
0 |
unless open my $fh, '<:perlio', $path |
90
|
0 |
0 |
unless open my $fh, '>:perlio', $path |
190
|
0 |
0 |
if ($sgf =~ /[^\015\012]\015/) { } |
210
|
0 |
0 |
if $@ |
218
|
0 |
0 |
unless $$self{'sgf'} =~ /\G$ws\(/cogs |
226
|
0 |
0 |
unless $$self{'sgf'} =~ /\G$ws\)/cogs |
236
|
0 |
0 |
if ('ARRAY' eq ref $_) { } |
|
0 |
0 |
elsif ('HASH' eq ref $_) { } |
239
|
0 |
0 |
if (exists $$_{'_text'}) { } |
282
|
0 |
0 |
if ($prop) { } |
285
|
0 |
0 |
if ($$prop{'is_list'}) { } |
290
|
0 |
0 |
if $name eq 'CA' |
324
|
0 |
0 |
if ($is_root) |
349
|
0 |
0 |
unless $name eq uc $name |
355
|
0 |
0 |
if ($prop = $$property{$name}) { } |
356
|
0 |
0 |
if ($$prop{'is_list'}) { } |
362
|
0 |
0 |
ref $value ? : |
414
|
25 |
101 |
if (s/e?list of //) { } |
|
7 |
94 |
elsif (s/composed (\S+)\s+(?:':'\s+)?(\S+)//) { } |
|
7 |
87 |
elsif (s/double//) { } |
|
1 |
86 |
elsif (s/color//) { } |
|
3 |
83 |
elsif (s/none//) { } |
|
30 |
53 |
elsif (s/point// or s/move// or s/stone//) { } |
|
18 |
35 |
elsif (s/real// or s/number//) { } |
|
35 |
0 |
elsif (s/text// or s/simpletext//i) { } |
424
|
0 |
0 |
if ($_[1] =~ /^((?:[^\\:]+|\\.)*)(?::(.*))?$/s) |
429
|
0 |
0 |
defined $r ? : |
444
|
0 |
0 |
unless $_[1] =~ /^[12]$/ |
456
|
0 |
0 |
if $_[1] eq '1' |
457
|
0 |
0 |
if $_[1] eq '2' |
459
|
0 |
0 |
unless $_[1] =~ /^[BW]$/i |
470
|
0 |
0 |
unless $_[1] =~ /^$/i |
481
|
0 |
0 |
if ($_[2]{'is_list'}) |
482
|
0 |
0 |
if ($_[1] =~ /^([^:]+):(.*)$/) |
495
|
0 |
0 |
$_[1] =~ /^(.)(.)$/ ? : |