line |
true |
false |
branch |
97
|
0 |
0 |
unless $self->brik_help_set_undef_arg("api_key", $api_key) |
98
|
0 |
0 |
unless $self->brik_help_run_undef_arg("check", $ip) |
103
|
0 |
0 |
unless $self->get("https://www.abuseipdb.com/check/" . $ip . "/json?key=" . $api_key . "&days=" . $days) |
109
|
0 |
0 |
if (ref $r ne "ARRAY") |
113
|
0 |
0 |
unless my $categories = $self->get_categories |
132
|
0 |
0 |
unless $self->brik_help_set_undef_arg("api_key", $api_key) |
133
|
0 |
0 |
unless $self->brik_help_run_undef_arg("check_from_hostname", $hostname) |
135
|
0 |
0 |
unless my $cd = "Metabrik::Client::Dns"->new_from_brik_init($self) |
136
|
0 |
0 |
unless my $a = $cd->a_lookup($hostname) |
157
|
0 |
0 |
unless $self->brik_help_set_undef_arg("api_key", $api_key) |
158
|
0 |
0 |
unless $self->brik_help_run_undef_arg("report", $ip) |
159
|
0 |
0 |
unless $self->brik_help_run_undef_arg("report", $category) |
164
|
0 |
0 |
unless $self->get("https://www.abuseipdb.com/report/json?key=" . $api_key . "&category=" . $category . "&comment=" . $comment . "&ip=" . $ip) |