Perl getpwuid 函数

• 

  描述

  getpwuid 根据EXPR指定的用户名，从/etc/passwd文件中提取列表上下文中的字段列表。通常这样使用-（$name，$passwd，$uid，$gid，$quota，$comment，$gcos，$dir，$shell）= getpwuid（$uid）;在标量上下文中，返回用户名。如果尝试访问整个/etc/passwd文件，则应使用getpwent函数。如果要按用户名访问详细信息，请使用getpwnam。
• 

  句法

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

  
  getpwuid EXPR
  

• 

  返回值

  此函数在标量上下文中返回用户名，并在列表上下文中返回用户记录（名称，密码，用户ID，组ID，引用，注释，实名，主目录，shell）。
• 

  示例

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

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