| line |
true |
false |
branch |
|
85
|
1 |
1 |
unless ref $cmd_opts eq "HASH"
|
|
92
|
0 |
7 |
unless exists $OPTIONS_MAP{$opt}
|
|
97
|
1 |
6 |
if ($opt eq "database")
|
|
102
|
1 |
5 |
if ($opt eq "verbosity")
|
|
107
|
2 |
3 |
if (exists $data->{'ExecutionOptions'}{$opt} and $data->{'ExecutionOptions'}{$opt} eq 'y') { }
|
|
123
|
0 |
3 |
unless ref $html_ref
|
|
130
|
3 |
2 |
unless defined $name
|
|
131
|
2 |
0 |
if $name eq "sendreport"
|
|
196
|
0 |
1 |
unless defined $level and $level ne ""
|
|
198
|
0 |
1 |
unless defined $log_file and $log_file ne ""
|
|
210
|
0 |
1 |
unless exists $levels{$level}
|
|
214
|
0 |
1 |
if ($level eq 'DEBUG') { }
|
|
239
|
1 |
0 |
if (my $errors_ref = find_errors($content_ref))
|
|
242
|
0 |
0 |
if ($error->is_fatal) { }
|
|
322
|
0 |
1 |
if ($logger->is_debug)
|
|
328
|
0 |
1 |
if _error_handling($response_ref)
|
|
333
|
1 |
0 |
if ($response_ref) { }
|
|
336
|
0 |
1 |
if ($logger->is_debug)
|
|
337
|
0 |
0 |
if $next_id
|
|
342
|
0 |
1 |
unless defined $next_id
|
|
349
|
0 |
1 |
if ($last_seen and $next_id eq $last_seen)
|
|
361
|
0 |
1 |
if ($logger->is_debug)
|
|
369
|
0 |
1 |
unless $response_ref
|
|
371
|
1 |
0 |
if (my $age_info_ref = find_message_age($response_ref))
|
|
372
|
1 |
0 |
if ($age_info_ref) { }
|
|
374
|
1 |
0 |
if ($logger->is_info)
|
|
389
|
1 |
0 |
if (my $warns_ref = find_warnings($response_ref))
|
|
391
|
0 |
1 |
if (@{$warns_ref;}) { }
|
|
403
|
1 |
0 |
if (my $errors_ref = find_errors($response_ref))
|
|
406
|
0 |
0 |
if ($error->is_fatal) { }
|
|
424
|
0 |
1 |
unless ($base_uri)
|
|
430
|
0 |
1 |
if ($logger->is_debug)
|
|
436
|
1 |
0 |
if ($logger->is_info)
|
|
437
|
1 |
0 |
if (@{$best_ref;})
|
|
444
|
0 |
1 |
unless defined $form
|
|
453
|
1 |
0 |
if ($logger->is_info) { }
|
|
459
|
1 |
0 |
if ($spam_header_ref) { }
|
|
480
|
0 |
1 |
if ($info =~ /%([A-Fa-f\d]{2})/g)
|
|
484
|
1 |
0 |
if ($send and $send eq 'on' || $type =~ /^mole/ && $send == 1) { }
|
|
500
|
1 |
0 |
if ($willsend) { }
|
|
510
|
0 |
1 |
if ($wontsend) { }
|
|
520
|
0 |
0 |
if ($logger->is_debug and $form)
|
|
525
|
0 |
1 |
unless $form
|
|
530
|
1 |
0 |
if ($opts_ref->{'stupid'}) { }
|
|
534
|
0 |
0 |
if ($reply and not $reply =~ /^y/i) { }
|
|
|
0 |
0 |
elsif (not $reply) { }
|
|
552
|
1 |
0 |
if ($$response_ref =~ /Send Spam Report\(S\) Now/gi) { }
|
|
|
0 |
0 |
elsif ($$response_ref =~ /click reload if this page does not refresh automatically in \n(\d+) seconds/gs) { }
|
|
|
0 |
0 |
elsif ($$response_ref =~ /No source IP address found, cannot proceed. Not full header/gs) { }
|
|
554
|
0 |
1 |
unless ($opts_ref->{'stupid'})
|
|
561
|
0 |
0 |
if ($reply and not $reply =~ /^y/i) { }
|
|
609
|
0 |
1 |
if ($opts_ref->{'check_only'})
|
|
617
|
0 |
1 |
if ($_cancel) { }
|
|
619
|
0 |
1 |
if ($logger->is_debug)
|
|
636
|
0 |
1 |
unless $response_ref
|
|
638
|
0 |
1 |
if ($_cancel)
|
|
646
|
1 |
0 |
if (scalar @{$receivers_ref;} > 0) { }
|
|
648
|
1 |
0 |
if ($logger->is_info)
|
|
667
|
0 |
1 |
if $logger->is_debug
|
|
670
|
1 |
0 |
if ($opts_ref->{'database'}{'enabled'})
|
|
673
|
1 |
0 |
if $logger->is_info
|