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  =