Função Perl getpwnam
Descrição
Esta função retorna uma lista de campos no contexto da lista, conforme extraído do arquivo / etc / passwd, com base no nome do usuário especificado por EXPR. Geralmente é usado assim -
($ name, $ passwd, $ uid, $ gid, $ quota, $ comment, $ gcos, $ dir, $ shell) = getpwnam ($ user);
Em um contexto escalar, retorna o ID do usuário numérico. Se você está tentando acessar o arquivo / etc / passwd inteiro, você deve usar a função getpwent. Se você deseja acessar os detalhes por ID de usuário, use getpwuid.
Sintaxe
A seguir está a sintaxe simples para esta função -
getpwnam EXPR
Valor de retorno
Esta função retorna o ID do usuário no contexto escalar e o registro do usuário (nome, senha, ID do usuário, ID do grupo, cotação, comentário, nome real, diretório inicial, shell) no contexto da lista.
Exemplo
A seguir está o código de exemplo que mostra seu uso básico -
#!/usr/bin/perl
($name, $passwd, $uid, $gid, $quota, $comment, $gcos, $dir, $shell) = getpwnam("root");
print "Name = $name\n";
print "Password = $passwd\n";
print "UID = $uid\n";
print "GID = $gid\n";
print "Quota = $quota\n";
print "Comment = $comment\n";
print "Gcos = $gcos\n";
print "HOME DIR = $dir\n";
print "Shell = $shell\n";
Quando o código acima é executado, ele produz o seguinte resultado -
Name = root
Password = x
UID = 0
GID = 0
Quota =
Comment =
Gcos = root
HOME DIR = /root
Shell = /bin/bash