¿Cómo puedo encontrar el espacio libre disponible en volúmenes montados usando Perl?

Question

Estoy tratando de descomprimir un archivo. Antes de quitar el marcador, me gustaría saber si hay espacio libre disponible en el volumen montado. ¡El plan es que si no hay suficiente espacio no lo desataré! Entonces, ¿cómo puedo encontrar el espacio libre disponible en un volumen montado usando Perl? Por cierto, estoy usando Perl para tar y untar.

Todo el mundo está diciendo acerca de df y dh pero estos comandos no funcionan en los puntos de montaje. ¿Qué sucede si quiero encontrar el espacio libre en el que puedo escribir en un punto montado?

Answer 1

El uso de comandos de shell para generar un solo número gratuito K, que Perl puede utilizar:

Cambio en el directorio donde desea deshacer (si no está ya allí) y ejecutar:

df . | grep -v '^Filesystem' | awk 'NF=6{print $4}NF==5{print $3}{}' 

O reemplace "." con el punto de montaje real.

grep elimina el encabezado y el awk imprime los kilobytes disponibles para líneas divididas y no divididas.

Esto se basa en el siguiente tipo de salida, es posible que tenga que ajustar si su UNIX da salida a algo diferente:

 
Filesystem 1K-blocks  Used Available Use% Mounted on 
/dev/sda4  206434224 56965356 139065176 30%/
varrun   1037296  132 1037164 1% /var/run 
varlock   1037296   0 1037296 0% /var/lock 
udev   1037296  68 1037228 1% /dev 
devshm   1037296  12 1037284 1% /dev/shm 
/dev/sda2   93327  43535  44973 50% /boot 
/dev/sdc1  155056484 29417456 117824612 20% /media/extra160 
gvfs-fuse-daemon 
       206434224 56965356 139065176 30% /home/pax/.gvfs 

Answer 2

Es probable que desee el módulo CPAN Filesys::DfPortable.

Answer 3

Se podía utilizar una función de comandos de Linux para obtener el resultado:

my $vol = "/dev/volume"; 
my $freespace = `df $vol | grep '$vol' | awk '{print \$4}'`; 
# free space in megabytes. 
$freespace = sprintf("%01.2f", $freespace/1024); 

Answer 4

Trate Filesys::DF (sistema POSIX) o Filesys::DfPortable (Windows también). Ambos usan código nativo para enumerar las estadísticas de FS.