Help for this page

Select Code to Download

Select or download this
```
use Win32;
$login = Win32::LoginName;
```

Select or download this

use Win32::NetAdmin;
$user = Win32::LoginName; # grab the name of the current user
...
    $privilege, $homedir, $comment,
    $flags, $scriptpath);
print "The homedir for $username is $homedir\n";