Copyright © tutorialspoint.com

PERL setgrent Function


Syntax

setgrent


Definition and Usage

Sets (or resets) the enumeration to the beginning of the set of group entries. This function should be called before the first call to getgrent.

Return Value

  • Nothing

Example

Try out following example:

#!/usr/bin/perl -w

while( ($name,$passwd,$gid,$members) = getgrent() ){
   print "Name  = $name\n";
   print "Password  = $passwd\n";
   print "GID  = $gid\n";
   print "Members  = $members\n";
}

setgrent();    # Set the beginnging of the group database;

print "Again reading /etc/passwd file\n";
while( ($name,$passwd,$gid,$members) = getgrent() ){
   print "Name  = $name\n";
   print "Password  = $passwd\n";
   print "GID  = $gid\n";
   print "Members  = $members\n";
}

endpwent;  #claose the database;
	
}

Copyright © tutorialspoint.com