Wie kann ich den verfügbaren freien Speicherplatz auf bereitgestellten Volumes mit Perl finden?

Question

Ich versuche, eine Datei zu entpacken. Vor dem Untarring möchte ich wissen, wie viel freier Speicherplatz auf dem gemounteten Volume zur Verfügung steht. Der Plan ist, wenn es nicht genug Platz gibt, werde ich es nicht entpacken! Wie kann ich den verfügbaren freien Speicherplatz auf einem bereitgestellten Volume mit Perl finden? Übrigens verwende ich Perl für Teer und Untar.

Jeder sagt über df und dh, aber diese Befehle funktionieren nicht auf den Mount-Punkten. Was ist, wenn ich den freien Platz finden möchte, an dem ich in einen gemounteten Punkt schreiben kann?

Answer 1

Mit Shell-Befehlen eine einzelne K freier Nummer zu erzeugen, die Perl verwenden können:

Wechseln Sie in das Verzeichnis, in dem Sie möchten entpacken (wenn nicht schon da) und ausführen:

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

Oder ersetzen Sie "." mit dem tatsächlichen Mount-Punkt.

Der grep entfernt den Header und awk druckt die verfügbaren Kilobyte für Split- und No-Split-Zeilen aus.

Dieses auf der folgenden Art von Ausgang basiert, können Sie einstellen müssen, um, wenn Ihr UNIX gibt etwas anderes:

 
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

Wahrscheinlich möchten Sie das CPAN-Modul Filesys::DfPortable.

Answer 3

Sie könnten nur verwenden integrierte in Linux-Befehle, um die Ergebnisse zu erhalten:

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

Versuchen Filesys::DF (Posix-System) oder Filesys::DfPortable (Windows auch). Beide verwenden nativen Code zum Aufzählen von FS-Statistiken.