| line |
true |
false |
branch |
|
139
|
0 |
0 |
if ($res->is_success) { } |
|
150
|
0 |
0 |
if (-f $path) { } |
|
151
|
0 |
0 |
if (open my $fh, '<', $path) { } |
|
168
|
0 |
0 |
if (open my $fh, '>', $filename) { } |
|
169
|
0 |
0 |
if (print $fh $content) { } |
|
170
|
0 |
0 |
if (close $fh) { } |
|
197
|
0 |
0 |
if ($res_ini->is_success) { } |
|
200
|
0 |
0 |
if ($res_md5->is_success) { } |
|
205
|
0 |
0 |
if ($hash eq $expected_hash) { } |
|
230
|
0 |
4 |
if (not -f $cache_file) { } |
|
234
|
4 |
0 |
if (@stat) { } |
|
244
|
0 |
4 |
if ($do_check or $force) { } |
|
247
|
0 |
0 |
if (defined $current_version and !defined($cache_version) || $current_version gt $cache_version) { } |
|
264
|
3392 |
0 |
if (defined $regex) { } |
|
279
|
4 |
0 |
if (open my $fh, '<', $file) { } |
|
286
|
156 |
74652 |
if /^;/ |
|
288
|
36 |
74616 |
if (/^\[([\w_]+)\]\s*$/) { } |
|
|
74616 |
0 |
elsif (/^(\d+)\[\] = "(.*)"\s*$/) { } |
|
289
|
8 |
28 |
if (defined $lastvalues) |
|
297
|
6784 |
67832 |
if ($$REGEX_SECS{$cursec}) { } |
|
298
|
3392 |
3392 |
if (defined $lastid and $id == $lastid) { } |
|
301
|
3384 |
8 |
if defined $lastid |
|
313
|
0 |
4 |
if (defined $lastvalues) |
|
321
|
0 |
28 |
unless (defined $a and @$a) |
|
329
|
0 |
8 |
unless $self->_compileRegexes($$self{$key}) |
|
339
|
0 |
5620 |
if ($os_id and defined $$self{'os'}[$os_id]) |
|
363
|
0 |
8 |
if (defined $val and not $val =~ /^\d+$/) |
|
369
|
0 |
4 |
if ($opts{'cache_dir'}) |
|
370
|
0 |
0 |
unless (-d $opts{'cache_dir'}) |
|
376
|
0 |
4 |
defined $opts{'parse_cache_size'} ? : |
|
382
|
4 |
0 |
if ($self->updateDB and $self->_loadDB) { } |
|
397
|
0 |
0 |
if defined $bos |
|
411
|
1 |
2 |
if (defined(my $robot = $$self{'robot_index'}{$string})) |
|
419
|
2 |
357 |
if ($string =~ /$regex/) |
|
424
|
2 |
0 |
if (defined $$self{'browser_type'}[$type]) |
|
429
|
0 |
2 |
if defined $bos |
|
432
|
2 |
0 |
unless (defined $os_id) |
|
436
|
2 |
221 |
if ($string =~ /$osregex/) |
|
443
|
2 |
0 |
if (defined $os_id and defined $$self{'os'}[$os_id]) |
|
459
|
4 |
3 |
if (exists $$self{'parse_cache'}{$string}) { } |
|
464
|
3 |
0 |
if ($$self{'parse_cache_count'} < $$self{'parse_cache_size'}) |