Ответ

В Perl файловые дескрипторы (filehandles) — это специальные объекты (глобальные или лексические переменные), которые ассоциируются с физическим или виртуальным файлом. Очень важно правильно открывать, проверять и закрывать файлы для предотвращения утечек ресурсов и нарушений безопасности.

Пример правильной работы:

open my $fh, '<', 'myfile.txt' or die "Can't open file: $!";
while (my $line = <$fh>) {
    print $line;
}
close $fh or warn "Couldn't close file: $!";

Тонкости:

Cовременно открывать файлы надо в режиме perl5: использовать lex-файлhandle (open my $fh, ...). Глобальные дескрипторы (OPEN FILE, ...) считаются устаревшими.
Проверка успеха открытия файла ОБЯЗАТЕЛЬНА. Всегда используйте or die/or warn.
После работы файл нужно закрывать через close и обрабатывать возможные ошибки.
Для бинарных файлов используйте слои: binmode $fh.
Во избежание уязвимостей всегда экранируйте переменные в путях и проверяйте права доступа.

Вопрос с подвохом

В чём разница между конструкцией open FH, ... и open my $fh, ..., и почему рекомендуется использовать второй вариант?

Ответ: Конструкция open my $fh, ... создаёт лексически ограниченный файловый дескриптор, то есть он работает только в пределах текущего блока/подпрограммы и автоматически уничтожается вне области видимости. Это предотвращает случайное перекрытие дескрипторов, защищает от конфликтов имён глобальных filehandles и повышает надёжность.

open FH, '<', 'file.txt';    # Глобальный дескриптор! Рекомендуется избегать.
open my $fh, '<', 'file.txt'; # Лексический, безопасно.

Примеры реальных ошибок из-за незнания тонкостей темы

История

В одном большом проекте допускали использование одинаковых глобальных дескрипторов (OPEN LOG, ...). В результате параллельные запросы случайно писали в не те файлы, что приводило к потере или перемешиванию логов.

История

Разработчик забыл проверять успешность открытия файла; в результате, если файл не существовал, перезаписывалась ошибка в другом месте (например, не туда писали логи, удаляли чужие файлы и т.д.).

История

Отсутствие вызова close приводило к исчерпанию дескрипторов на сервере при массовой обработке файлов — сервер начинал "зависать" и падать на огромных объёмах данных.