关注我们

Perl 中的 getlogin函数

描述

该函数返回用户名,由系统函数getlogin()发现。在Windows下,请改用Win32::LoginName()函数。

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

getlogin

如果失败,此函数返回undef,如果成功,则返回用户的登录名。

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

#!/usr/bin/perl

$login=getlogin || getpwuid($<) || "LearnFk";

print "Login ID is $login\n";

执行上述代码后,将产生以下输出-

Login ID is apache

祝学习愉快！(内容编辑有误？请选中要编辑内容 -> 右键 -> 修改 -> 提交！)

技术教程推荐

好记忆不如烂笔头。留下您的足迹吧 :)