Branch Coverage

blib/lib/Metabrik/Api/Abuseipdb.pm
Criterion Covered Total %
branch 0 26 0.0


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)