Función getprotobyname de Perl

Descripción

Esta función traduce el NOMBRE del protocolo a su número correspondiente en un contexto escalar, y su número y la información asociada en un contexto de lista: ($ nombre, $ alias, $ número_protocolo)

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

getprotobyname NAME

Valor devuelto

Esta función devuelve undef en caso de error, de lo contrario, el número de protocolo en contexto escalar y la lista vacía en el registro de protocolo de error (nombre, alias, número de protocolo) en el contexto de lista.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl

($name, $aliases, $protocol_number) = getprotobyname("tcp");

print "Name = $name\n";
print "Aliases = $aliases\n";
print "Protocol Number = $protocol_number\n";

Cuando se ejecuta el código anterior, produce el siguiente resultado:

Name = tcp
Aliases = TCP
Protocol Number = 6