I'm afraid I can't answer that. That's dependant of you setup, which I don't know. What software/component/action creates what variable a.s.o. ... Some test's might show you the way to go.
BTW be aware that all this assumes that the perl script is run by the USER or on his Workstation.