Perl: общий способ определения размера блочного устройства

Я регулярно использую -s чтобы найти размер файла. Он работает кросс-платформой.

Есть ли аналогичный проверенный способ определения размера блочного устройства?

Мы не говорим о размере файловой системы или свободного места в файловой системе, но о размере фактического блочного устройства?

  • Некоторые ошибки возникли, когда я установил lucene, модуль perl!
  • Отфильтровать несогласованные блоки данных
  • Проблемы с perl-скриптом, который должен удалять строки в строках одного файла из другого файла
  • Введите количество совпадений и количество строк совпадения
  • Считайте уникальные связанные значения в awk (или perl)
  • Сценарий Bash не может найти модуль perl
  • Почему это регулярное выражение perl не фиксирует обратную ссылку?
  • Perl-скрипт в bin, который вызывает файл
  • One Solution collect form web for “Perl: общий способ определения размера блочного устройства”

    Это похоже на работу:

     perl -e 'seek(STDIN,0,2); print tell(STDIN);' < /dev/sda 

    и выглядит довольно портативно. Требуется root.

    Было бы неплохо найти решение, которое не требует root.

    Проверено на: Linux, CygWin.

    Linux и Unix - лучшая ОС в мире.