- 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 getnetent Function
Description
This function gets the next entry from the /etc/networks file, returning − ($name, $aliases, $addrtype, $net)
If /etc/networks file is empty then it would not return anything and call will fail..
Syntax
Following is the simple syntax for this function −
getnetent
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; while ( ($name, $aliases, $addrtype, $net) = getnetent() ) { 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 Name = loopback Aliases = Addrtype = 2 Net = 2130706432 Name = link-local Aliases = Addrtype = 2 Net = 2851995648
perl_function_references.htm
Advertisements