Função Perl getpwuid

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) = getpwuid ($ uid);

Em um contexto escalar, retorna o nome do usuário. Se você está tentando acessar o arquivo / etc / passwd inteiro, você deve usar a função getpwent. Se você quiser acessar os detalhes por nome de usuário, use getpwnam.

Sintaxe

A seguir está a sintaxe simples para esta função -

getpwuid EXPR

Valor de retorno

Esta função retorna o nome do usuário no contexto escalar e o registro do usuário (nome, senha, ID do usuário, ID do grupo, citaçã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) = getpwuid(0);
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