NAME
Acme::MetaSyntactic::services - The services theme
DESCRIPTION
The names of the services usually found in /etc/services.
The first list came 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
For version 0.68, this was golfed a little more, by using the symbol table as the hash table it is:
perl -ne 's/[#\s].*//;y/-/_/;$$_++||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.
The latest is now used for Acme::MetaSyntactic::services
, which increased the theme size by a factor of 14.
CONTRIBUTOR
Philippe "BooK" Bruhat.
Introduced in version 0.33, published on August 1, 2005.
Updated and made automatically updatable with the graffiti.com list in version 0.68, published on April 3, 2006.