无涯教程-Perl - getgrent函数

120 阅读1分钟

描述

此函数遍历/etc/group文件中的条目。在列表context中返回以下内容-

($name,$passwd,$gid,$members)

$members标量包含作为组成员的登录名的空格分隔列表。仅在标量context中使用时才返回组名。在Windows下,请考虑使用Win32API::Net模块。

语法

以下是此函数的简单语法-

getgrent

返回值

此函数在定标器context和列表context(名称,密码,组ID和成员列表)中返回组名。

以下是显示其基本用法的示例代码-

#!/usr/bin/perl

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

执行上述代码后,将产生以下输出-

Name =root
Password =x
GID =0
Members =root
Name =bin
Password =x
GID =1
Members =root bin daemon
Name =daemon
Password =x
GID =2
Members =root bin daemon
Name =sys
Password =x
GID =3
Members =root bin adm
Name =adm
Password =x
GID =4
Members =root adm daemon
Name =tty
Password =x
GID =5
Members =
.
.
.
Name =fuse
Password =x
GID =496
Members =
Name =kvm
Password =x
GID =36
Members =qemu
Name =qemu
Password =x
GID =107
Members =
Name =com
Password =x
GID =501
Members =
Name =webgrp
Password =x
GID =502
Members =com
Name =railo
Password =x
GID =495
Members =

参考链接

www.learnfk.com/perl/perl-g…