Copyright © tutorialspoint.com

PERL endnetent Function


Syntax

endnetent


Definition and Usage

Tells the system you no longer expect to read entries from the networks list using getnetent.

Return Value

  • None

Example

Try out following example:

#!/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";
}

setnetent(1); # Rewind the database;

while ( ($name, $aliases, $addrtype, $net)  = getnetent() ){

   print "Name = $name\n";
   print "Aliases = $aliases\n";
   print "Addrtype = $addrtype\n";
   print "Net = $net\n";
}

endnetent();  # Closes the database;

Copyright © tutorialspoint.com