Foro - Perl en Español

saludos a todos.

Necesito informacion acerca de como manejar particiones de disco: Detectar, montar, desmontar, copiar y afines.

¿Es posible hacer eso con perl?.

Adicionalmente como se puede obtener la salida de un comando para asignarla a una variable. Tengo el perldoc completo, pero ahi consegui cosas que entiendo muy poco en relacion a esto.

Muchas gracias.

daga escribiste:Necesito informacion acerca de como manejar particiones de disco: Detectar, montar, desmontar, copiar y afines.

¿Es posible hacer eso con perl?.

Si es posible, si buscas en CPAN vas a encontrar lo que buscas. Ahora, como no especificas el sistema operativo que usas no te puedo dar algo más especifico, pero puedes comenzar con las siguientes ligas:
http://search.cpan.org/modlist/Server_Daemon_Utilities
http://search.cpan.org/modlist/Operatin ... Interfaces

daga escribiste:Adicionalmente como se puede obtener la salida de un comando para asignarla a una variable. Tengo el perldoc completo, pero ahi consegui cosas que entiendo muy poco en relacion a esto.

Aquí en el sitio hay un tutorial que habla acerca de eso:
Ejecutar programas externos a perl


Saludos

Hermano uso linux. Quiero montar y desmontar particiones y trabajar con ellas. Las soportadas por el kernel.

Primero, para trabajar con particiones, ya sabes que tienes que hacerlo con el usuario root.
Luego, es mucho más cómodo usar los comandos propios del sistema para manejar las particiones, aunque si quieres automatizar algunas tareas Perl te puede ayudar muchísimo.
Esta es la lista de comandos que yo suelo utilizar:

fdisk -lu /dev/hda # Esto me da el listado de particiones del disco hda
mount ... # Montaje de particiones. Debo indicar partición, punto de montaje y tipo de partición
umount ... # Desmontaje
mkfs ... # Peligrosísimo comando que crea un nuevo sistema de ficheros en una partición
fsck ... # Chequea la consistencia de un sistema de ficheros
cp -uva ... ... # Sistema de copia de ficheros de una partición a otra, respetando todos los atributos

Sabiendo esto, puedes llamar a estos comandos como te ha indicado kidd.
Para obtener la salida de uno de estos comandos a una variable, por ejemplo, se puede hacer de estas formas:

Código: Seleccionar todo

$x = qx(fdisk -lu /dev/sdb);
$x = `fdisk -lu /dev/sdb`;

Si no quieres capturar la salida y sólo te interesa ejecutar el comando y como mucho recibir el estado de la ejecución, te vale con usar la función system.