- Perl Basics
- Perl - Home
- Perl - Introduction
- Perl - Environment
- Perl - Syntax Overview
- Perl - Data Types
- Perl - Variables
- Perl - Scalars
- Perl - Arrays
- Perl - Hashes
- Perl - IF...ELSE
- Perl - Loops
- Perl - Operators
- Perl - Date & Time
- Perl - Subroutines
- Perl - References
- Perl - Formats
- Perl - File I/O
- Perl - Directories
- Perl - Error Handling
- Perl - Special Variables
- Perl - Coding Standard
- Perl - Regular Expressions
- Perl - Sending Email
- Perl Advanced
- Perl - Socket Programming
- Perl - Object Oriented
- Perl - Database Access
- Perl - CGI Programming
- Perl - Packages & Modules
- Perl - Process Management
- Perl - Embedded Documentation
- Perl - Functions References
- Perl Useful Resources
- Perl - Questions and Answers
- Perl - Quick Guide
- Perl - Useful Resources
- Perl - Discussion
Perl getnetbyaddr Function
Description
This function returns the information for the network specified by ADDR and type ADDRTYPE in a list context: ($name, $aliases, $addrtype, $net)
Syntax
Following is the simple syntax for this function −
getnetbyaddr ADDR, ADDRTYPE
Return Value
This function returns undef on error otherwise Network address in scalar context and empty list on error otherwise Network record (name, aliases, address type, network address) in list context.
Example
Following is the example code showing its basic usage −
#!/usr/bin/perl
use Socket;
$iaddr = inet_aton("127.1"); # or whatever address
($name, $aliases, $addrtype, $net) = getnetbyaddr($iaddr, AF_INET);
print "Name = $name\n";
print "Aliases = $aliases\n";
print "Addrtype = $addrtype\n";
print "Net = $net\n";
When above code is executed, it produces the following result −
Name = default Aliases = Addrtype = 2 Net = 0
perl_function_references.htm
Advertisements