Funzione getlogin di Perl

Descrizione

Questa funzione restituisce il nome dell'utente, come scoperto dalla funzione di sistema getlogin (). In Windows, utilizza invece la funzione Win32 :: LoginName ().

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

getlogin

Valore di ritorno

Questa funzione restituisce undef in caso di errore e il nome di accesso dell'utente in caso di successo.

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base:

#!/usr/bin/perl

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

print "Login ID is $login\n";

Quando viene eseguito il codice sopra, produce il seguente risultato:

Login ID is apache