Função Perl getgrgid
Descrição
Esta função pesquisa a entrada do arquivo de grupo por ID de grupo. Retorna o seguinte em um contexto de lista -
($ name, $ passwd, $ gid, $ members)
O escalar $ members contém uma lista separada por espaço dos nomes de login que são membros do grupo. Retorna o nome do grupo em um contexto escalar. Para obter um método mais eficiente de recuperação de todo o arquivo de grupos, consulte getgrent. No Windows, considere usar o módulo Win32API :: Net.
Sintaxe
A seguir está a sintaxe simples para esta função -
getgrgid GID
Valor de retorno
Esta função retorna No contexto scalr, ela retorna o nome do Grupo e no contexto da lista (Nome, Senha, ID do Grupo e lista de membros.
Exemplo
A seguir está o código de exemplo que mostra seu uso básico -
#!/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";
}
Quando o código acima é executado, ele produz o seguinte resultado -
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 =