Perl-getpwuid
提供:Dev Guides
Perl getpwuid関数
説明
この関数は、EXPRで指定されたユーザー名に基づいて、/etc/passwdファイルから抽出されたリストコンテキストのフィールドのリストを返します。 それは一般的にこのように使用されます-
($ name、$ passwd、$ uid、$ gid、$ quota、$ comment、$ gcos、$ dir、$ shell)= getpwuid($ uid);
スカラーコンテキストでは、ユーザー名を返します。/etc/passwdファイル全体にアクセスしようとしている場合は、getpwent関数を使用する必要があります。 ユーザー名で詳細にアクセスする場合は、getpwnamを使用します。
構文
以下は、この関数の簡単な構文です-
getpwuid EXPR
戻り値
この関数は、スカラーコンテキストでユーザー名を返し、リストコンテキストでユーザーレコード(名前、パスワード、ユーザーID、グループID、引用、コメント、実名、ホームディレクトリ、シェル)を返します。
例
以下は、その基本的な使用法を示すコード例です-
#!/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