Foro - Perl en Español

scout escribiste:Gente: necesito hacer un script que deniegue el acceso a un archivo. Me gustaría saber cómo se puede hacer en Perl.

Manualmente, sería así... encontrar el archivo con el botón derecho sobre el, propiedades, seguridad.

Seleccionamos el grupo al que vamos a Denegar el acceso y marcamos el casillero de Denegar.

Puedes usar Win32::FileSecurity. Antes usaba el Win32::Perms de Dave Roth, autor de dos de los mejores libros de Perl para Windows, pero creo que Dave Roth ya no trabaja demasiado con Perl; una pena.

Si usas Perl de ActiveState lo puedes instalar muy fácil. Otra solución es usar setacl.exe (funciona mucho mejor que cacls o que xcacls de Microsoft). La página de setacl: http://setacl.sourceforge.net/

Muchas gracias, lo del setacl lo vi y me parece bueno; la única pega es que sería un paso más dentro del exe... pero lo tendré en cuenta... muchas gracias...