#Format: getservbyname(NAME, PROTOCOL);
($name,$aliases,$port,$protocol)=getservbyname('telnet', 'tcp');