Función getlogin de Perl

Descripción

Esta función devuelve el nombre del usuario, según lo descubierto por la función del sistema getlogin (). En Windows, utilice la función Win32 :: LoginName () en su lugar.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

getlogin

Valor devuelto

Esta función devuelve undef en caso de error y el nombre de inicio de sesión del usuario si tiene éxito.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl

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

print "Login ID is $login\n";

Cuando se ejecuta el código anterior, produce el siguiente resultado:

Login ID is apache