Функция die.

Функция die получает список, выводит этот список на STDERR, а затем завершает PERL-процесс с ненулевым кодом выхода.

open(DATA, ">/tmp/data") || die "Sorry, I couldn't open /tmp/data\n";

Если строке сообщения не использовать символ \n, то к сообщению автоматически присоединяется имя программы и номер строки.

die "good bye";

die "good bye\n";

Использование переменной $!, содержащей строку последней из ошибок операционной системы.

open(LOG, ">>logfile") || die "cannot append:$!";

возможное сообщение: cannot append: Permission denied