В ином случае она возвращает ложное значение, что заставляет интерпретатор Perl обработать выражение, находящееся справа от оператора or. Это выражение просто вызывает завершение работы с сообщением об ошибке, в котором применяется гло­бальная переменная $! интерпретатора Perl для выборки последнего полученного системного сообщения об ошибке.

Затем дважды выполняется вызов функции print для записи текста в дескрип­тор файла. Первым параметром функции print является дескриптор файла, а вторым и последующим параметрами — строки, которые должны быть записаны в дескриптор файла. Еще раз подчеркнем, что между именем дескриптора файла и строками, предназначенными для печати, нет запятой. Все, что будет выведено в дескриптор файла, появится в соответствующем ему файле. Если параметр функции print с указанием дескриптора файла будет опущен, этот параметр принимает значение по умолчанию, равное STDOUT.

После окончания вывода вызывается функция close для закрытия дескриптора файла. Функция close возвращает истинное значение, если дескриптор файла был закрыт без каких-либо нарушений, или ложное, если произошло какое-либо неблагоприятное событие, например переполнение диска. Проверка кода результата выполняется с использованием такой же конструкции с оператором or, как и при открытий файла.