Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -wT
use strict;
print "Content-type: text/html\n\n";
print "<p><b>$_</b><br>$ENV{$_}\n" for sort keys %ENV;
  2. or download this
    use Socket;
$iaddr  = gethostbyname('www.perlmonks.com');
$name   = gethostbyaddr($iaddr, AF_INET);
print $name;