use Win32; my $userName = Win32::LoginName(); print "Current User: ", $userName, "\n"; [download]
In reply to Re: getpwnam by JamesNC in thread The getpwnam function is unimplemented (in Windows) by Becky