line |
true |
false |
branch |
28
|
0 |
0 |
$^O eq 'MSWin32' ? : |
40
|
0 |
0 |
if (scalar @_ and defined _STRING($_[-1]) and $_[-1] eq '-DEBUG') |
45
|
0 |
0 |
if (_HASH($_[0])) { } |
57
|
0 |
0 |
unless (-e $dir) |
68
|
0 |
0 |
unless ($useragent) |
80
|
0 |
0 |
if (open my $fh, '<', $last_mod_file) |
90
|
0 |
0 |
if ($last_mod_local eq $last_mod) { } |
94
|
0 |
0 |
if $DEBUG |
105
|
0 |
0 |
unless ($online or -f $db) |
113
|
0 |
0 |
if ($need_refetch or not -e $zip_path) |
114
|
0 |
0 |
if $DEBUG |
118
|
0 |
0 |
unless ($response->is_success or $response->code == 304) |
126
|
0 |
0 |
if -e $old_txt_file |
128
|
0 |
0 |
if ($regenerated_sqlite or not -e $txt_path) |
129
|
0 |
0 |
if $DEBUG |
133
|
0 |
0 |
unless ($ok) |
136
|
0 |
0 |
unless (-e $txt_path) |
142
|
0 |
0 |
if ($regenerated_sqlite or not -e $db) |
172
|
0 |
0 |
if $file eq 'last_mod.txt' |
173
|
0 |
0 |
if $DEBUG |
177
|
0 |
0 |
if $line =~ /^\#/ |
178
|
0 |
0 |
if $line =~ /^\s+$/ |
184
|
0 |
0 |
unless $sth->execute($hex, $type, $val) |
195
|
0 |
0 |
$DEBUG ? : |