无涯教程-Perl - getgrgid函数

64 阅读1分钟

描述

此功能通过组ID查找组文件条目。在列表context中返回以下内容-

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

$members标量包含作为组成员的登录名的空格分隔列表。在标量context中返回组名。有关检索整个组文件的更有效方法,请参阅getgrent。在Windows下,请考虑使用Win32API::Net模块。

语法

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

getgrgid GID

返回值

此函数返回在scalrcontext中,它返回组名,并在列表context中(名称,密码,组ID和成员列表)返回。

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

#!/usr/bin/perl

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

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

Name =root
Password =x
GID =0
Members =
Name =bin
Password =x
GID =1
Members =
Name =daemon
Password =x
GID =2
Members =
Name =sys
Password =x
GID =3
Members =
Name =adm
Password =x
GID =4
Members =
Name =tty
Password =x
GID =5
Members =
Name =disk
Password =x
GID =6
Members =
Name =lp
Password =x
GID =7
Members =
.
.
.
.
Name =apache
Password =x
GID =48
Members =
Name =rexx
Password =x
GID =1001
Members =
Name =objc
Password =x
GID =1002
Members =

参考链接

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