Subject: | $ENV{'HOME'} is $ENV{USERPROFILE} on win32 |
line 71
- $HOME = $ENV{'HOME'} || (getpwuid($<))[7];
+ $HOME = $ENV{'HOME'} || $ENV{USERPROFILE} || (getpwuid($<))[7];
You may wanna use
User - API for locating user information regardless of OS
http://search.cpan.org/CPAN/authors/id/T/TB/TBONE/User-1.6.tar.gz