Foro - Perl en Español

Buenas, vengo aquí con una nueva duda (sí, soy un poco pesadete )

Veréis, en un archivo Perl tengo que cambiar los permisos de varios archivos, (en concreto el "passwd" y el "shadow"). El caso es que soy incapaz de cambiarles los permisos, he intentado con:



También he probado con:


Y también tengo otra duda:
No sé cómo puedo borrar una carpeta desde un Perl. He intentado con unlink y remove pero no se eliminan.

¿Alguna idea?

¡Gracias!

Para poder cambiar los permisos de un archivo que pertenece al root, debes ser root.

A mí sí que me deja cambiar los permisos:

Código: Seleccionar todo

# perl -E 'chmod(0660,"/etc/passwd");' ; ls -l /etc/passwd
-rw-rw---- 1 root root 2486 abr 30 12:48 /etc/passwd


pero para hacerlo, tengo que ser 'root'.

Para eliminar un directorio se usa rmdir().

Atención: el directorio debe estar vacío. Si no lo está, y lo que quieres es borrar ese directorio y todo lo que contiene, usa la función rmtree() del módulo File::Path.

Más información en perldoc -f rmdir

Y, por supuesto, para poder borrarlo, debes tener permisos para hacerlo, igual que antes.

Sí, sí soy 'root', y desde línea de comandos soy capaz de cambiarle los permisos pero no dentro de un script perl.

Entonces es que ese script no lo está ejecutando el usuario root.

¿No lo estará ejecutando el cron o el usuario web?

Prueba a ejecutarlo desde la línea de comandos siendo root.