Tutorials Point


  Perl Home

  PERL Functions

© 2011 TutorialsPoint.COM


  Home     References     About TP     Advertising  

PERL endservent Function



Syntax

endservent


Definition and Usage

Tells the system you no longer expect to read entries from the services file using getservent.

Return Value

  • None

Example

Try out following example:

#!/usr/bin/perl


while(($name, $aliases, $port_number,
     $protocol_name) = getservent()){

   print "Name = $name\n";
   print "Aliases = $aliases\n";
   print "Port Number = $port_number\n";
   print "Protocol Name = $protocol_name\n";

}

setservent();   # Rewind the database;

while(($name, $aliases, $port_number,
     $protocol_name) = getservent()){

   print "Name = $name\n";
   print "Aliases = $aliases\n";
   print "Port Number = $port_number\n";
   print "Protocol Name = $protocol_name\n";

}

endservent();  # Closes the database;


Printer Friendly



  

Advertisement

Online Image Processing

Indian Baby Names