The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

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.

SEE ALSO

Acme::MetaSyntactic, Acme::MetaSyntactic::List.