我想知道如何从df(" /")获取第二行第4列的值。这是df的输出:
Filesystem Size Used Avail Use% Mounted on
rootfs 208G 120G 78G 61% /
fakefs 208G 120G 78G 61% /root
fakefs 1.8T 1.3T 552G 70% /home4/user
fakefs 4.0G 1.3G 2.8G 31% /ramdisk/bin
fakefs 4.0G 1.3G 2.8G 31% /ramdisk/etc
fakefs 4.0G 1.3G 2.8G 31% /ramdisk/php
fakefs 208G 120G 78G 61% /var/lib
fakefs 208G 120G 78G 61% /var/lib/mysql
fakefs 208G 120G 78G 61% /var/log
fakefs 208G 120G 78G 61% /var/spool
fakefs 208G 120G 78G 61% /var/run
fakefs 4.0G 361M 3.7G 9% /var/tmp
fakefs 208G 120G 78G 61% /var/cache/man
我试图使用perl来获取可用的可用空间(78GB),这是我相当新的。我能够使用以下linux命令获取值,但我听说没有必要在perl中使用awk,因为perl可以在本机上执行awk。
df -h | tail -n +2 | sed -n '2p' | awk '{ print $4 }'
我很难过。我尝试使用Filesys :: df模块,但是当我打印出可用的使用百分比时,它会给我一个不同于从命令行运行df的值。感谢帮助。
答案 0 :(得分:6)
更简洁一点:
df -h | perl -wlane 'print $F[3] if $. == 2;'
-w enable warnings
-l add newline to output(and chomps newline from input line)
-a splits the fields on whitespace into the @F array, which you access using the syntax $F[n] (first column is at index position 0)
-n puts the code inside the following loop:
LINE:
while (<>) {
... # code goes here
}
# <> reads lines from STDIN if no filenames are given on the command line
-e execute the string
$. current line number in the file (For the first line, $. is 1)
答案 1 :(得分:1)
如果您希望在perl
中完成所有操作,那么:
df -h | perl -e 'while (<stdin>) { if ($. == 2) { @x = split; print $x[3] }}'
这仅使用perl
来读取df -h
的输出,并且对于第二条记录($. == 2
),将记录拆分为字段,基于空格,并输出字段3(计数)从0)。
答案 2 :(得分:0)
这似乎也可行:
df -h | awk 'NR==2 {print $4}'
获取第二行和品脱第四个字段。