Архив форумов ЦИТФорума

[Bombadil]

Как в Perl организовать что-то наподобии команды df. Т.е. как получить процент занятости дискового пространства?

[FFF]

зачем организовывать подобие, если можно пользоваться оригиналом! Например, так:

$df_dev = `df /usr | grep '/usr'`;
@df_dev_2=split(" ",$df_dev);

print "\n dev: $df_dev_2[0] capacity: $df_dev_2[4] \n";