- 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 endhostent Function
Description
This function tells the system you no longer expect to read entries from the hosts file using gethostent.
Syntax
Following is the simple syntax for this function −
endhostent
Return Value
This function does not return any value.
Example
Following is the example code showing its basic usage −
#!/usr/bin/perl while( ($name, $aliases, $addrtype, $length, @addrs) = gethostent() ) { print "Name = $name\n"; print "Aliases = $aliases\n"; print "Addr Type = $addrtype\n"; print "Length = $length\n"; print "Addrs = @addrs\n"; } sethostent(1); while( ($name, $aliases, $addrtype, $length, @addrs) = gethostent() ) { print "Name = $name\n"; print "Aliases = $aliases\n"; print "Addr Type = $addrtype\n"; print "Length = $length\n"; print "Addrs = @addrs\n"; } endhostent(); # Closes the database;
When above code is executed, it produces the following result −
Name = ip-50-62-147-141.ip.secureserver.net Aliases = ip-50-62-147-141 localhost.secureserver.net localhost.localdomain localhost Addr Type = 2 Length = 4 Addrs = Name = ip-50-62-147-141.ip.secureserver.net Aliases = ip-50-62-147-141 localhost.secureserver.net localhost.localdomain localhost Addr Type = 2 Length = 4 Addrs =
perl_function_references.htm
Advertisements