Realizuoja C bibliotekos funkciją tuo pačiu vardu, kuri daugumoje sistemų gražina esamąjį registracijos vardą iš /etc/utmp, jei toks yra. Null atveju naudokite getpwuid.

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

Nenaudokite getlogin autentifikacijai: jis toks pat nesaugus kaip ir getpwuid.