$ENV{EUID} = getpwnam(jjack);