Использование диска в Perl Core

Я ищу способ проверить оставшееся свободное место на диске в Perl. Я не могу использовать CPAN, так как мне нужно развернуть скрипт на многих серверах с разными версиями Perl, и я не могу изменить его, потому что мой руководитель группы заказал мне такой путь.

Любая идея? Я старался File::stat но я не могу использовать его на D:\ (скрипт работает на версиях Windows).

Спасибо!

1 ответ

fsutil volume diskfree C:

Для серверов Windows вы можете запустить эту команду cmd из метода system().

Другие вопросы по тегам