Help language development. Donate to The Perl Foundation
Map ports to services (and back) for internet services. Using this CSV file included in the distribution, creates and exports 4 hashes that map ports to services and back, for UDP and TCP.
%TCPServicesmaps ports to TCP services
%TCPPortsmaps service names to ports;
And idem with UDP instead of TCP.
[protocol]Services, a hash that maps port numbers to the services
it hosts, and
[protocol]Ports, which maps the conventional service name to
the port it uses.
protocol == any <TCP UDP SCTP DCCP>
No, I had never heard about these last two before
say %TCPServices<80>; # should return www-http say %UDPPorts<domain>; # should return 53
You can also use
.keys to print the existing ports or services.
(c) JJ Merelo,
[email protected], 2020-2022
Released under the GPL-3.0 license.