Select Code to Download

        // #includes omitted for the sake of sanity
        HANDLE token;
...
        if (security) free(security);
        if (sid) free(sid);
        return retValue;

        my $filename = 'somefile';
        my $newuser = 'someuser';
...
        my $newuid = getpwname($newuser)[2];
        my $oldguid = stat($filename)[5];
        return ($newuid && chown($newuid, $oldguid, $filename));

        my $filename = 'somefile';
        my $newuser = 'someuser';

        return getpwname($newuser) && chown(getpwnam($newuser)[2], sta
+t($filename)[5], $filename);