Perl getpwuid 函数

描述

该函数根据 EXPR 指定的用户名返回列表上下文中的字段列表，这些字段是从 /etc/passwd 文件中提取的。它通常这样使用 -

($name, $passwd, $uid, $gid, $quota, $comment, $gcos, $dir, $shell) = getpwuid ($uid);

在标量上下文中，返回用户名。如果您尝试访问整个 /etc/passwd 文件，您应该使用 getpwent 函数。如果您想通过用户名访问详细信息，请使用 getpwnam。

句法

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

getpwuid EXPR

返回值

此函数返回标量上下文中的用户名和列表上下文中的用户记录（名称、密码、用户 ID、组 ID、引用、评论、真实姓名、主目录、shell）。

例子

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

#!/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";

执行上述代码时，会产生以下结果 -

Name = root
Password = x
UID = 0
GID = 0
Quota = 
Comment = 
Gcos = root
HOME DIR = /root
Shell = /bin/bash