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) |