Jon Warbrick, July 2014, V3.2 (for Ansible 1.7)
First one found from of
Jon Warbrick, July 2014, V3.2 (for Ansible 1.7)
First one found from of
use strict; | |
use Modern::Perl; | |
use Data::Dumper; | |
use Net::IP; | |
# Generate a hash for well-known port numbers | |
my %well_known_ports; | |
while (<DATA>){ | |
next if /^#/; | |
my ($keyword, $full_port_name) = split /\s+/; |