PPM> set repository roth http://www.roth.net/perl/packages
PPM> install Win32-AdminMisc

##</code><code>##

Win32::AdminMisc::LogonAsUser($domain,$username,$password);