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)