parra/perl
1
0
Fork 0
mirror of https://github.com/parrazam/perl.git synced 2024-11-23 19:59:20 +01:00
Code Issues Projects Releases Packages Wiki Activity
Scripts en perl
3 commits 1 branch 0 tags 40 KiB
Perl 100%
Find a file
parra 24f32b6d3b Baja de usuarios 
En este script tan sólo necesitamos hacer uso de la función Linux::usermod->del, la cual elimina el usuario pasado por parámetro en la variable $usuario.

Previamente eliminamos todo su directorio home con la orden rmtree, la cual elimina todos los ficheros y directorios (de forma recursiva) que se encuentren por debajo de la raíz que le pasamos como parámetro.. Los parámetros que se le pasan son:

    - $ruta -> Raíz del directorio que queremos eliminar (en nuestro caso, el directorio home del usuario, p.e. para el usuario prueba sería: /home/prueba el contenido de dicha variable.
    - El segundo parámetro (booleano) si se encuentra a true nos irá listando los archivos y directorios que se irán borrando a medida que se vaya ejecutando la orden.
    - El tercer valor pasado a dicha función es también un boolean que, a true, garantiza que no se borrarán aquellos ficheros para los cuales no tenemos permisos (en el caso de ejecutar el script como root obviamente siempre tendremos permiso).
2016-05-18 15:00:14 +02:00
.gitignore Initial commit 2016-05-18 14:53:30 +02:00
alta_usuarios.pl Alta de usuarios 2016-05-18 14:58:35 +02:00
baja_usuarios.pl Baja de usuarios 2016-05-18 15:00:14 +02:00
LICENSE Initial commit 2016-05-18 14:53:30 +02:00
README.md Initial commit 2016-05-18 14:53:30 +02:00

README.md

perl

Scripts en perl