| line |
true |
false |
branch |
|
47
|
0 |
0 |
unless $self->brik_help_run_undef_arg("myip", $apikey) |
|
51
|
0 |
0 |
unless my $resp = $self->get($uri . "/tools/myip?key=" . $apikey) |
|
64
|
0 |
0 |
unless $self->brik_help_run_undef_arg("api_info", $apikey) |
|
68
|
0 |
0 |
unless my $resp = $self->get($uri . "/api-info?key=" . $apikey) |
|
71
|
0 |
0 |
unless my $sj = "Metabrik::String::Json"->new_from_brik_init($self) |
|
72
|
0 |
0 |
unless my $decoded = $sj->decode($content) |
|
82
|
0 |
0 |
unless $self->brik_help_run_undef_arg("host_ip", $ip) |
|
83
|
0 |
0 |
unless $self->brik_help_run_undef_arg("host_ip", $apikey) |
|
85
|
0 |
0 |
unless my $na = "Metabrik::Network::Address"->new_from_brik_init($self) |
|
86
|
0 |
0 |
unless ($na->is_ip($ip)) |
|
92
|
0 |
0 |
unless my $resp = $self->get($uri . "/shodan/host/" . $ip . "?key=" . $apikey) |
|
95
|
0 |
0 |
unless my $sj = "Metabrik::String::Json"->new_from_brik_init($self) |
|
96
|
0 |
0 |
unless my $decoded = $sj->decode($content) |