The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<html><head><title>Net::IANA::Services</title>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" >
</head>
<body class='pod'>
<!--
  generated by Pod::Simple::HTML v3.23,
  using Pod::Simple::PullParser v3.23,
  under Perl v5.016001 at Sun Sep  9 14:47:12 2012 GMT.

 If you want to change this HTML document, you probably shouldn't do that
   by changing it directly.  Instead, see about changing the calling options
   to Pod::Simple::HTML, and/or subclassing Pod::Simple::HTML,
   then reconverting this document from the Pod source.
   When in doubt, email the author of Pod::Simple::HTML for advice.
   See 'perldoc Pod::Simple::HTML' for more info.

-->

<!-- start doc -->
<a name='___top' class='dummyTopAnchor' ></a>

<h1><a class='u'
name="NAME"
>NAME</a></h1>

<p>Net::IANA::Services - Makes working with named ip services easier</p>

<h1><a class='u'
name="VERSION"
>VERSION</a></h1>

<p>version 0.001000</p>

<h1><a class='u'
name="SYNOPSIS"
>SYNOPSIS</a></h1>

<pre>    #  Load the module
    use Net::IANA::Services (
        #  Import the regular expressions to test for services/ports
        &#39;:regexes&#39;,

        #  Import the hashes to test for services/ports or get info for a service/protocol
        &#39;:hashes&#39;,

        #  Import the subroutines to test for services/ports or get info for a service/protocol
        &#39;:subs&#39;,

        #  Alternatively this loads everything
        #  &#39;:all&#39;,
    );


    #  Declare some strings to test
    my $service = &#39;https&#39;;
    my $port    = 22;


    #  How the regexes work
    $service =~ $IANA_REGEX_SERVICES;      # 1
    $service =~ $IANA_REGEX_SERVICES_UDP;  # 1
    $port    =~ $IANA_REGEX_PORTS;         # 1
    $port    =~ $IANA_REGEX_PORTS_TCP;     # 1


    #  Demonstration of the service hashes
    $IANA_HASH_INFO_FOR_SERVICE-&#62;{ $service }{ tcp }; # { name =&#62; &#39;HTTPS&#39;, desc =&#62; &#39;https description&#39;, note =&#62; &#39;note about https&#39; }

    $IANA_HASH_PORTS_FOR_SERVICE      -&#62;{ $service }; # [qw/ 443 /]              --  List of all the services that use that port

    #  Demonstration  of the port hashes
    $IANA_HASH_SERVICES_FOR_PORT      -&#62;{ $port };    # [qw/ ssh /]         --  List of all the services that use that port
    $IANA_HASH_SERVICES_FOR_PORT_PROTO-&#62;{ $port };    # {tcp =&#62; qw/ ssh /}  --  Hash of all the protocol/services that use that port


    #  Demonstration of the service/port checker subroutines
    iana_has_service( $service        );  # 1
    iana_has_service( $service, &#39;tcp&#39; );  # 1
    iana_has_service( $service, &#39;bla&#39; );  # 0
    iana_has_port   ( $port           );  # 1

    #  Demonstration of the service/port info subroutines
    iana_info_for_service( $service        );  # Returns a hash of the different protocol definitions
    iana_info_for_service( $service, &#39;tcp&#39; );  # Returns a hash of the info for https over tcp
    iana_info_for_port   ( $port           );  # Returns a list all services that go over that port (regardless of the protocol)
    iana_info_for_port   ( $port, &#39;tcp&#39;    );  # Returns a list all services that go over that port on tcp</pre>

<h1><a class='u'
name="DESCRIPTION"
>DESCRIPTION</a></h1>

<p>Working with named services can be a pain when you want to go back and forth between the port and its real name. This module helps alleviate some of those pain points by defining some helping hashes, functions, and regular expressions.</p>

<h1><a class='u'
name="CONSTANTS"
>CONSTANTS</a></h1>

<h2><a class='u'
name="$IANA_REGEX_PORTS"
>$IANA_REGEX_PORTS</a></h2>

<p>Regular expression to match any port, irregardless of which protocol it goes over.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $port =~ $IANA_REGEX_PORTS;

    # Won&#39;t match
    $non_port =~ $IANA_REGEX_PORTS;</pre>

<h2><a class='u'
name="$IANA_REGEX_SERVICES"
>$IANA_REGEX_SERVICES</a></h2>

<p>Regular expression to match any service, irregardless of which protocol it goes over.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $service =~ $IANA_REGEX_SERVICES;

    # Won&#39;t match
    $non_service =~ $IANA_REGEX_SERVICES;</pre>

<h2><a class='u'
name="$IANA_REGEX_PORTS_DCCP"
>$IANA_REGEX_PORTS_DCCP</a></h2>

<p>Regular expression to match any port that is known to work over dccp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $port_dccp =~ $IANA_REGEX_PORTS_DCCP;

    # Won&#39;t match
    $non_port_dccp =~ $IANA_REGEX_PORTS_DCCP;</pre>

<h2><a class='u'
name="$IANA_REGEX_PORTS_SCTP"
>$IANA_REGEX_PORTS_SCTP</a></h2>

<p>Regular expression to match any port that is known to work over sctp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $port_sctp =~ $IANA_REGEX_PORTS_SCTP;

    # Won&#39;t match
    $non_port_sctp =~ $IANA_REGEX_PORTS_SCTP;</pre>

<h2><a class='u'
name="$IANA_REGEX_PORTS_TCP"
>$IANA_REGEX_PORTS_TCP</a></h2>

<p>Regular expression to match any port that is known to work over tcp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $port_tcp =~ $IANA_REGEX_PORTS_TCP;

    # Won&#39;t match
    $non_port_tcp =~ $IANA_REGEX_PORTS_TCP;</pre>

<h2><a class='u'
name="$IANA_REGEX_PORTS_UDP"
>$IANA_REGEX_PORTS_UDP</a></h2>

<p>Regular expression to match any port that is known to work over udp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $port_udp =~ $IANA_REGEX_PORTS_UDP;

    # Won&#39;t match
    $non_port_udp =~ $IANA_REGEX_PORTS_UDP;</pre>

<h2><a class='u'
name="$IANA_REGEX_SERVICES_DCCP"
>$IANA_REGEX_SERVICES_DCCP</a></h2>

<p>Regular expression to match any service that is known to work over dccp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $service_dccp =~ $IANA_REGEX_SERVICES_DCCP;

    # Won&#39;t match
    $non_service_dccp =~ $IANA_REGEX_SERVICES_DCCP;</pre>

<h2><a class='u'
name="$IANA_REGEX_SERVICES_SCTP"
>$IANA_REGEX_SERVICES_SCTP</a></h2>

<p>Regular expression to match any service that is known to work over sctp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $service_sctp =~ $IANA_REGEX_SERVICES_SCTP;

    # Won&#39;t match
    $non_service_sctp =~ $IANA_REGEX_SERVICES_SCTP;</pre>

<h2><a class='u'
name="$IANA_REGEX_SERVICES_TCP"
>$IANA_REGEX_SERVICES_TCP</a></h2>

<p>Regular expression to match any service that is known to work over tcp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $service_tcp =~ $IANA_REGEX_SERVICES_TCP;

    # Won&#39;t match
    $non_service_tcp =~ $IANA_REGEX_SERVICES_TCP;</pre>

<h2><a class='u'
name="$IANA_REGEX_SERVICES_UDP"
>$IANA_REGEX_SERVICES_UDP</a></h2>

<p>Regular expression to match any service that is known to work over udp.</p>

<p>While this is a highly optimized regex, you should consider using the hashes or subroutines instead as they are much better. This is merely for your convenience.</p>

<p>Case is ignored and the protocol must match on a word boundary!</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    # Matches
    $service_udp =~ $IANA_REGEX_SERVICES_UDP;

    # Won&#39;t match
    $non_service_udp =~ $IANA_REGEX_SERVICES_UDP;</pre>

<h2><a class='u'
name="$IANA_HASH_INFO_FOR_SERVICE"
>$IANA_HASH_INFO_FOR_SERVICE</a></h2>

<p>This maps a service and a protocol to the information provided to us by IANA.</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    #  Get info for ssh over tcp
    $ssh_tcp_info = $IANA_HASH_INFO_FOR_SERVICE-&#62;{ ssh }{ tcp };

    Dumper $ssh_tcp_info;
    #   22 =&#62; {
    #      desc =&#62; &#39;The Secure Shell (SSH) Protocol&#39;
    #      name =&#62; &#39;ssh&#39;
    #      note =&#62; &#39;Defined TXT keys: u=&#60;username&#62; p=&#60;password&#62;&#39;
    #   }


    #  Get info for http over any protocol
    $http_info = $IANA_HASH_INFO_FOR_SERVICE-&#62;{ http };

    Dumper $http_info;
    #   sctp =&#62; {
    #       &#39;80&#39; =&#62; {
    #           desc =&#62; &#39;HTTP&#39;,
    #           name =&#62; &#39;http&#39;,
    #           note =&#62; &#39;Defined TXT keys =&#62; &#39;u=&#60;username&#62; p=&#60;password&#62; path=&#60;path to document&#62;&#39;,
    #       },
    #   },
    #   tcp =&#62; {
    #       &#39;80&#39; =&#62; {
    #           desc =&#62; &#39;World Wide Web HTTP&#39;,
    #           name =&#62; &#39;http&#39;,
    #           note =&#62; &#39;Defined TXT keys: u=&#60;username&#62; p=&#60;password&#62; path=&#60;path to document&#62;&#39;,
    #       },
    #   },
    #   udp =&#62; {
    #       &#39;80&#39; =&#62; {
    #           desc =&#62; &#39;World Wide Web HTTP&#39;,
    #           name =&#62; &#39;http&#39;,
    #           note =&#62; &#39;Defined TXT keys: u=&#60;username&#62; p=&#60;password&#62; path=&#60;path to document&#62;&#39;,
    #       },
    #   },</pre>

<h2><a class='u'
name="$IANA_HASH_SERVICES_FOR_PORT"
>$IANA_HASH_SERVICES_FOR_PORT</a></h2>

<p>This lists all of the services for the given port, irregardless of the protocol.</p>

<p>An empty list will be returned if nothing is found. This respects wantarray&#62;</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    my $port_22 = $IANA_HASH_SERVICES_FOR_PORT-&#62;{ 22 };
    Dumper $port_22;
    # [qw/ ssh /];

    my $port_1110 = $IANA_HASH_SERVICES_FOR_PORT-&#62;{ 1110 };
    Dumper $port_1110;
    # [qw/ nfsd-keepalive  webadmstart /]</pre>

<h2><a class='u'
name="$IANA_HASH_SERVICES_FOR_PORT_PROTO"
>$IANA_HASH_SERVICES_FOR_PORT_PROTO</a></h2>

<p>This lists all of the services for the given port and protocol.</p>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    my $port_22 = $IANA_HASH_SERVICES_FOR_PORT-&#62;{ 22 }{ tcp };
    Dumper $port_22;
    # [qw/ ssh /];

    my $port_tcp_1110 = $IANA_HASH_SERVICES_FOR_PORT-&#62;{ 1110 }{ tcp };
    Dumper $port_tcp_1110;
    # [qw/ webadmstart /]

    my $port_udp_1110 = $IANA_HASH_SERVICES_FOR_PORT-&#62;{ 1110 }{ udp };
    Dumper $port_udp_1110;
    # [qw/ nfsd-keepalive /]</pre>

<h2><a class='u'
name="$IANA_HASH_PORTS_FOR_SERVICE"
>$IANA_HASH_PORTS_FOR_SERVICE</a></h2>

<p>This lists all of the ports for the given service, irregardless of the protocol.</p>

<h3><a class='u'
name="Example"
>Example</a></h3>

<pre>    my $service_http_alt = $IANA_HASH_PORTS_FOR_SERVICE-&#62;{ &#39;http-alt&#39; };
    Dumper $service_http_alt;
    # [qw/ 591  8008  8080 /];</pre>

<h1><a class='u'
name="METHODS"
>METHODS</a></h1>

<h2><a class='u'
name="iana_has_port"
>iana_has_port</a></h2>

<p>Helper function to check if the given port (and optional protocol) is defined by IANA.</p>

<p>If only the port is given, then it will be checked across all protocols while restricting the search to just the provided protocol if one is given.</p>

<h3><a class='u'
name="Arguments"
>Arguments</a></h3>

<ol>
<li>Port
<ul>
<li>Required</li>

<li><code>Port (int)</code></li>

<li>Port you want looked up</li>
</ul>
</li>

<li>Protocol
<ul>
<li><i>Optional</i></li>

<li><code>String</code></li>

<li>Limit the search to only this protocol if specified</li>
</ul>
</li>
</ol>

<h3><a class='u'
name="Returns"
>Returns</a></h3>

<ol>
<li>Search results
<ul>
<li><code>Boolean</code></li>

<li>1 if the match was found, 0 otherwise</li>
</ul>
</li>
</ol>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    iana_has_port( 22 );    # 1
    iana_has_port( 34221 ); # 0

    iana_has_port( 271, &#39;tcp&#39; );  # 1
    iana_has_port( 271, &#39;udp&#39; );  # 0</pre>

<h2><a class='u'
name="iana_has_service"
>iana_has_service</a></h2>

<p>Helper function to check if the given service (and optional protocol) is defined by IANA.</p>

<p>If only the service name is given, then it will be checked across all protocols while restricting the search to just the provided protocol if one is given.</p>

<h3><a class='u'
name="Arguments"
>Arguments</a></h3>

<ol>
<li>Service Name
<ul>
<li>Required</li>

<li><code>String</code></li>

<li>Service name you want looked up</li>
</ul>
</li>

<li>Protocol
<ul>
<li><i>Optional</i></li>

<li><code>String</code></li>

<li>Limit the search to only this protocol if specified</li>
</ul>
</li>
</ol>

<h3><a class='u'
name="Returns"
>Returns</a></h3>

<ol>
<li>Search results
<ul>
<li><code>Boolean</code></li>

<li>1 if the match was found, 0 otherwise</li>
</ul>
</li>
</ol>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    iana_has_service( &#39;ssh&#39; );    # 1
    iana_has_service( &#39;not-ss&#39; ); # 0

    iana_has_service( &#39;xmpp-server&#39;, &#39;tcp&#39; );  # 1
    iana_has_service( &#39;xmpp-server&#39;, &#39;udp&#39; );  # 0</pre>

<h2><a class='u'
name="iana_info_for_port"
>iana_info_for_port</a></h2>

<p>Helper function to get the known services for the given port and optional protocol, as defined by IANA.</p>

<p>If only the port is given, then you will get back an array ref containing all of the services that are defined by IANA. If a protocol is specified, then the returned prtocols will be limited to those running over that type.</p>

<h3><a class='u'
name="Arguments"
>Arguments</a></h3>

<ol>
<li>Port
<ul>
<li>Required</li>

<li><code>Port (int)</code></li>

<li>Port you want looked up</li>
</ul>
</li>

<li>Protocol
<ul>
<li><i>Optional</i></li>

<li><code>String</code></li>

<li>Limit the search to only this protocol if specified</li>
</ul>
</li>
</ol>

<h3><a class='u'
name="Returns"
>Returns</a></h3>

<ol>
<li>Search results
<ul>
<li><code>Array</code></li>

<li>The list of protocols running over the specified info (arrayref if in scalar context)</li>
</ul>
</li>
</ol>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    iana_info_for_port( 22 );    # [qw/ ssh /]
    iana_info_for_port( 34221 ); # []

    iana_info_for_port( 271, &#39;tcp&#39; );  # [qw/ pt-tls /]
    iana_info_for_port( 271, &#39;udp&#39; );  # []</pre>

<h2><a class='u'
name="iana_info_for_service"
>iana_info_for_service</a></h2>

<p>Helper function to get the known information for the given service and optional protocol, as defined by IANA.</p>

<p>If only the service is given, then you will get back a hash ref containing the normal return information hash for each defined protocol for that service.</p>

<h3><a class='u'
name="Arguments"
>Arguments</a></h3>

<ol>
<li>Service Name
<ul>
<li>Required</li>

<li><code>String</code></li>

<li>Service name you want looked up</li>
</ul>
</li>

<li>Protocol
<ul>
<li><i>Optional</i></li>

<li><code>String</code></li>

<li>Limit the search to only this protocol if specified</li>
</ul>
</li>
</ol>

<h3><a class='u'
name="Returns"
>Returns</a></h3>

<ol>
<li>Service information (for a provided protocol)
<ul>
<li><code>Hash</code></li>

<li>Undefined if the searched was unsuccessful!</li>
</ul>

<p>The returned hash contains the following pieces of information (keys are lower case):</p>

<dl>
<dt><a name="Name"
>Name</a></dt>

<dd>
<p>The full name (with proper capitalization) for the requested service</p>

<dt><a name="Desc"
>Desc</a></dt>

<dd>
<p>A short synopsis of the service, usually a sentence or two long</p>

<dt><a name="Note"
>Note</a></dt>

<dd>
<p>Any additional information they wanted to provided that users should be aware of</p>
</dd>
</dl>
</li>
</ol>

<h3><a class='u'
name="Examples"
>Examples</a></h3>

<pre>    iana_info_for_service( &#39;xribs&#39; );  # { udp =&#62; { 2025 =&#62; { desc =&#62; &#39;&#39;, name =&#62; &#39;xribs&#39;, note =&#62; &#39;&#39; } } }
    iana_info_for_service( &#39;not-ss&#39; ); # undef

    iana_info_for_service( &#39;xribs&#39;, &#39;tcp&#39; );  # undef
    iana_info_for_service( &#39;xribs&#39;, &#39;udp&#39; );  # { 2025 =&#62; { desc =&#62; &#39;&#39;, name =&#62; &#39;xribs&#39;, note =&#62; &#39;&#39; } }</pre>

<h1><a class='u'
name="INSTALLATION"
>INSTALLATION</a></h1>

<p>See perlmodinstall for information and options on installing Perl modules.</p>

<h1><a class='u'
name="AUTHOR"
>AUTHOR</a></h1>

<p>Adam Lesperance &#60;lespea@gmail.com&#62;</p>

<h1><a class='u'
name="SUPPORT"
>SUPPORT</a></h1>

<h2><a class='u'
name="Perldoc"
>Perldoc</a></h2>

<p>You can find documentation for this module with the perldoc command.</p>

<pre>  perldoc Net::IANA::Services</pre>

<h2><a class='u'
name="Websites"
>Websites</a></h2>

<p>The following websites have more information about this module, and may be of help to you. As always, in addition to those websites please use your favorite search engine to discover more resources.</p>

<ul>
<li>MetaCPAN
<p>A modern, open-source CPAN search engine, useful to view POD in HTML format.</p>

<p><a href="http://metacpan.org/release/Net-IANA-Services" class="podlinkurl"
>http://metacpan.org/release/Net-IANA-Services</a></p>
</li>

<li>Search CPAN
<p>The default CPAN search engine, useful to view POD in HTML format.</p>

<p><a href="http://search.cpan.org/dist/Net-IANA-Services" class="podlinkurl"
>http://search.cpan.org/dist/Net-IANA-Services</a></p>
</li>

<li>RT: CPAN&#39;s Bug Tracker
<p>The RT ( Request Tracker ) website is the default bug/issue tracking system for CPAN.</p>

<p><a href="http://rt.cpan.org/NoAuth/Bugs.html?Dist=Net-IANA-Services" class="podlinkurl"
>http://rt.cpan.org/NoAuth/Bugs.html?Dist=Net-IANA-Services</a></p>
</li>

<li>AnnoCPAN
<p>The AnnoCPAN is a website that allows community annotations of Perl module documentation.</p>

<p><a href="http://annocpan.org/dist/Net-IANA-Services" class="podlinkurl"
>http://annocpan.org/dist/Net-IANA-Services</a></p>
</li>

<li>CPAN Ratings
<p>The CPAN Ratings is a website that allows community ratings and reviews of Perl modules.</p>

<p><a href="http://cpanratings.perl.org/d/Net-IANA-Services" class="podlinkurl"
>http://cpanratings.perl.org/d/Net-IANA-Services</a></p>
</li>

<li>CPAN Forum
<p>The CPAN Forum is a web forum for discussing Perl modules.</p>

<p><a href="http://cpanforum.com/dist/Net-IANA-Services" class="podlinkurl"
>http://cpanforum.com/dist/Net-IANA-Services</a></p>
</li>

<li>CPANTS
<p>The CPANTS is a website that analyzes the Kwalitee ( code metrics ) of a distribution.</p>

<p><a href="http://cpants.perl.org/dist/overview/Net-IANA-Services" class="podlinkurl"
>http://cpants.perl.org/dist/overview/Net-IANA-Services</a></p>
</li>

<li>CPAN Testers
<p>The CPAN Testers is a network of smokers who run automated tests on uploaded CPAN distributions.</p>

<p><a href="http://www.cpantesters.org/distro/N/Net-IANA-Services" class="podlinkurl"
>http://www.cpantesters.org/distro/N/Net-IANA-Services</a></p>
</li>

<li>CPAN Testers Matrix
<p>The CPAN Testers Matrix is a website that provides a visual overview of the test results for a distribution on various Perls/platforms.</p>

<p><a href="http://matrix.cpantesters.org/?dist=Net-IANA-Services" class="podlinkurl"
>http://matrix.cpantesters.org/?dist=Net-IANA-Services</a></p>
</li>

<li>CPAN Testers Dependencies
<p>The CPAN Testers Dependencies is a website that shows a chart of the test results of all dependencies for a distribution.</p>

<p><a href="http://deps.cpantesters.org/?module=Net::IANA::Services" class="podlinkurl"
>http://deps.cpantesters.org/?module=Net::IANA::Services</a></p>
</li>
</ul>

<h2><a class='u'
name="Bugs_/_Feature_Requests"
>Bugs / Feature Requests</a></h2>

<p>Please report any bugs or feature requests by email to <code>bug-net-iana-services at rt.cpan.org</code>, or through the web interface at <a href="http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Net-IANA-Services" class="podlinkurl"
>http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Net-IANA-Services</a>. You will be automatically notified of any progress on the request by the system.</p>

<h2><a class='u'
name="Source_Code"
>Source Code</a></h2>

<p>The code is open to the world, and available for you to hack on. Please feel free to browse it and play with it, or whatever. If you want to contribute patches, please send me a diff or prod me to pull from your repository :)</p>

<p><a href="https://github.com/lespea/net-iana-services" class="podlinkurl"
>https://github.com/lespea/net-iana-services</a></p>

<pre>  git clone git://github.com/lespea/net-iana-services.git</pre>

<h1><a class='u'
name="COPYRIGHT_AND_LICENSE"
>COPYRIGHT AND LICENSE</a></h1>

<p>This software is copyright (c) 2012 by Adam Lesperance.</p>

<p>This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.</p>

<h1><a class='u'
name="DISCLAIMER_OF_WARRANTY"
>DISCLAIMER OF WARRANTY</a></h1>

<p>BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE SOFTWARE &#34;AS IS&#34; WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR, OR CORRECTION.</p>

<p>IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENCE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.</p>

<!-- end doc -->

</body></html>