NAME
Acme::MetaSyntactic::services - The services theme
DESCRIPTION
The names of the services usually found in /etc/services. This list comes from my Debian system and was extracted with:
perl -lane '$_=$F[0];y/-/_/;!/#/&&!$s{$_}++&&print' /etc/services
Which was then golfed down to:
perl -lane '$_=$F[0];y/-/_/;!/#/&&$s{$_}++||print' /etc/services
perl -lane '$_=$F[0];y/-/_/;/#/||$s{$_}++||print' /etc/services
perl -ne 's/\s.*//;y/-/_/;/#/||$s{$_}++||print' /etc/services
perl -pe 's/[#\s].*//;y/-/_/;$s{$_}++&&goto LINE' /etc/services
perl -ne 's/[#\s].*//;y/-/_/;$s{$_}++||print' /etc/services
A bigger services lists is used by nmap: http://www.insecure.org/nmap/data/nmap-services. A huge list of services can also be found at http://www.graffiti.com/services.
CONTRIBUTOR
Philippe "BooK" Bruhat.
Introduced in version 0.33, published on August 1, 2005.