Perl getpwnam 函数

描述

此函数返回从 /etc/passwd 文件中提取的一系列字段，在列表上下文中，基于由 EXPR 指定的用户名称。通常用法如下：

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

在标量上下文中，返回数字用户 ID。如果您尝试访问整个 /etc/passwd 文件，则应使用 getpwent 函数。如果您想按用户 ID 访问详细信息，请使用 getpwuid。

语法

以下是此函数的简单语法：

getpwnam EXPR

返回值

此函数在标量上下文中返回用户 ID，在列表上下文中返回用户记录（名称、密码、用户 ID、组 ID、配额、注释、真实姓名、主目录、shell）。

示例

以下示例代码展示了其基本用法：

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

执行以上代码后，将产生以下结果：

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