The gethostbyaddr function translates a network address to its corresponding names. : gethostbyaddr « Network « Perl

Home
Perl
1.Array
2.CGI
3.Class
4.Data Type
5.Database
6.File
7.GUI
8.Hash
9.Language Basics
10.Network
11.Regular Expression
12.Report
13.Statement
14.String
15.Subroutine
16.System Functions
17.Win32
18.XML
Perl » Network » gethostbyaddr 
The gethostbyaddr function translates a network address to its corresponding names.
   

Format: gethostbyaddr(ADDRESS, DOMAIN_NUMBER);

#!/bin/perl
$address=pack("C4"127,0,0,1);
($name, $aliases,  $addrtype, $length, @addrs= gethostbyaddr($address,2);
($a, $b, $c, $d= unpack 'C4', $addrs[0]);
print "Hostname Is $name and the Internet address Is $a.$b.$c.$d.\n";

   
    
    
  
Related examples in the same category
1.The gethostbyaddr function searches the file /etc/hosts for the host name.
java2s.com  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.