Hallo Leute!
Ich habe gerade ein kleines großes Problem mit Win32::Perms.
Ich habe hier ein kleines Perl-Script (soll unter WinNT laufen, ohne Webserver, praktisch einfach nur als Applikation), mit dem ich Berechtigungen von einem Verzeichnis entfernen will:
Das Hinzufügen von Berechtigungen geht völlig problemlos, das Entziehen auch - nur das komplette Löschen mag er nicht.
Hat vielleicht jemand von euch 'nen heißen Tip oder evtl. eine alternative Lösung?
Hier der Code:
use Win32::Perms;
$Dir = new Win32::Perms( 'E:\test_auftraege' ) || die;
$Dir->Add( {Account=>'PK_G', Mask=>FULL } );
$Dir->Deny( 'PK_G', FULL );
$Dir->Remove({Account=>'PK_G'});
$Dir->Set();
$Dir->Close();
Für jeden Tipp dankbar,
DSW