C:\>perl -le "print getprotobyname('tcp')"
tcpTCP6

C:\>HEAD perlmonks.org
200 OK
Connection: close
Date: Thu, 15 Jul 2004 06:37:48 GMT
Server: Apache/1.3.27
Content-Type: text/html; charset=ISO-8859-1
Client-Date: Thu, 15 Jul 2004 06:39:06 GMT
Client-Peer: 209.197.123.153:80
Client-Response-Num: 1


C:\>