Função Perl getlogin

Descrição

Esta função retorna o nome do usuário, conforme descoberto pela função getlogin () do sistema. No Windows, use a função Win32 :: LoginName ().

Sintaxe

A seguir está a sintaxe simples para esta função -

getlogin

Valor de retorno

Esta função retorna undef em caso de falha e o nome de login do usuário em caso de sucesso.

Exemplo

A seguir está o código de exemplo que mostra seu uso básico -

#!/usr/bin/perl

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

print "Login ID is $login\n";

Quando o código acima é executado, ele produz o seguinte resultado -

Login ID is apache