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+/; |