- 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 endprotoent Function
Description
This function tells the system you no longer expect to read entries from the protocols list using getprotoent.
Syntax
Following is the simple syntax for this function −
endprotoent
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, $protocol_number) = getprotoent()) { print "Name = $name\n"; print "Aliases = $aliases\n"; print "Protocol Number = $protocol_number\n"; } setprotoent(1); # Rewind the database. while(($name, $aliases, $protocol_number) = getprotoent()) { print "Name = $name\n"; print "Aliases = $aliases\n"; print "Protocol Number = $protocol_number\n"; } endprotoent(); # Closes the database
When above code is executed, it produces the following result −
Name = ip Aliases = IP Protocol Number = 0 Name = hopopt Aliases = HOPOPT Protocol Number = 0 Name = icmp Aliases = ICMP Protocol Number = 1 Name = igmp Aliases = IGMP Protocol Number = 2 Name = ggp Aliases = GGP Protocol Number = 3 Name = ipencap Aliases = IP-ENCAP Protocol Number = 4 Name = st Aliases = ST Protocol Number = 5 Name = tcp Aliases = TCP Protocol Number = 6 . . . Name = manet Aliases = manet Protocol Number = 138 Name = hip Aliases = HIP Protocol Number = 139 Name = shim6 Aliases = Shim6 Protocol Number = 140
perl_function_references.htm
Advertisements