Yet Another CPAN Grep

Masscan-Scanner ( A/AV/AVERNA/Masscan-Scanner-20200329.150259.tar.gz, AVERNA, 2020; MetaCPAN )

Masscan-Scanner/lib/Masscan/Scanner.pm ( view source; MetaCPAN )

ured qw(:all);
use Carp;
use File::Spec;
use File::Temp;
use IPC::Open3;
use Symbol 'gensym';
use JSON;
use Net::DNS;
use Data::Validate::IP qw(is_ipv4 is_ipv6);
use Data::Validate::Domain qw(is_domai

n_results
{
    my $self = shift;
    my $cmd  = $self->command_line;
    my $sres = $self->_from_json($self->_slurp_file($self->scan_results_file));
    my %up_hosts;

    $self->logger->warn("No res

rn $str;
}

# internal method _from_json
# Does what it implies. Will convert JSON format into a Perl data structure.
#
# Returns Perl data structure.
sub _from_json
{
    my $self = shift;
    my $da