perl - 如何找到挂载点上的可用空间？

Question

我之前提出过这个问题，但没有一个解决方案适用于已安装的点。既不工作du也不df在安装点上工作。有没有办法找出来？

Answer 1

我不明白您所说的“不适用于安装点”是什么意思。切换到要解压的目录（如果还没有的话）并执行：

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

grep 去掉了标题，awk 打印出可用于拆分行和非拆分行的千字节。

这是基于以下类型的输出，如果您的 UNIX 输出不同，您可能需要进行调整：

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