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