| line |
true |
false |
branch |
|
38
|
3 |
3 |
if ($param{-'file'} or $param{-'www'}) { } |
|
40
|
0 |
3 |
unless $result |
|
43
|
0 |
3 |
if $ENV{'CHESS_FIDE_VERBOSE'} |
|
52
|
3 |
0 |
if ($param{-'file'}) { } |
|
|
0 |
0 |
elsif ($param{-'www'}) { } |
|
54
|
3 |
0 |
if (defined $fh) { } |
|
55
|
0 |
3 |
if $ENV{'CHESS_FIDE_VERBOSE'} |
|
65
|
0 |
0 |
if $param{-'proxy'} |
|
67
|
0 |
0 |
if $ENV{'CHESS_FIDE_VERBOSE'} |
|
70
|
0 |
0 |
if ($response->is_success) { } |
|
77
|
0 |
0 |
unless my $fh = 'IO::String'->new(\$webcontent) |
|
80
|
0 |
0 |
unless ($status == 0) |
|
87
|
0 |
0 |
unless defined $fh2 |
|
98
|
6 |
6 |
if $fide->{'meta'}{'game'} |
|
117
|
6 |
150 |
if ($field =~ /^\D\D\D\d\d$/) |
|
122
|
144 |
12 |
if ($start) |
|
137
|
4 |
30009 |
unless $info->{'name'} |
|
141
|
26217 |
3792 |
if ($info->{'name'} =~ /^(\S.*)\s*\,\s*(\S.*)/) { } |
|
|
3643 |
149 |
elsif ($info->{'name'} =~ /^(\S.*\S)\s+(\S+)$/) { } |
|
152
|
0 |
149 |
if $ENV{'CHESS_FIDE_VERBOSE'} |
|
167
|
4 |
340058 |
if (length $line <= $fide->{'meta'}{$field}[0] - 1) |
|
173
|
310054 |
30004 |
$fide->{'meta'}{$field}[0] ? : |
|
192
|
3 |
29997 |
if ($line =~ /^id/i) { } |
|
|
0 |
29997 |
elsif ($line =~ /Mr., Jonathan Rose/) { } |
|
|
29997 |
0 |
elsif ($line =~ /^\s*\d/) { } |
|
201
|
29995 |
2 |
if ($info{'name'} and $info{'name'} =~ /\S/) |
|
203
|
29995 |
0 |
if $player |
|
207
|
0 |
0 |
if $ENV{'CHESS_FIDE_VERBOSE'} |
|
221
|
2 |
32 |
if ($criteria =~ /^$field /i) |
|
227
|
0 |
2 |
unless $found |