Perl getpwnam用法及代碼示例

描述

此函數根據 EXPR 指定的用戶名返回從 /etc/passwd 文件中提取的列表上下文中的字段列表。它通常像這樣使用 -

($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