此函数返回系统函数getlogin()发现的用户名。 在Windows下,请改用Win32 :: LoginName()函数。
以下是此函数的简单语法 -
getlogin
此函数在失败时返回undef,并在成功时返回用户的登录名。
以下是显示其基本用法的示例代码 -
#!/usr/bin/perl
$login = getlogin || getpwuid($<) || "xnip";
print "Login ID is $login\n";
执行上述代码时,会产生以下结果 -
Login ID is apache