В блоке создается локальный обработчик int, который выводит предупреждающее со­общение, устанавливает переменную $abort равной истинному значению и вызывает функ­цию die, что приводит к завершению блока eval { }. Поскольку этот обработчик объявлен как локальный, первоначальный обработчик int на время замещается локальным, а затем авто­матически восстанавливается после выхода из блока eval {}. В самом блоке выполняется построчное чтение текстового файла и отправка его на сервер. После обнаружения признака конца файла на сервер в отдельной строке отправляется символ конца.

После выхода из цикла проверяется переменная $abort. Если она имеет истинное значение, то передача была прервана преждевременно, при нажатии пользователем клавиши прерыва­ния. Необходимо сообщить об этом серверу, чтобы он игнорировал все необработанные дан­ные, отправленные ему из этой клиентской программы. Эта задача выполняется путем отправ­ки серверу одного байта срочных данных.

Последний этап состоит в чтении строки ответа, полученной от сёрвера, и выводе числа ус­пешно обработанных уникальных слов.

Строки 61-67. Обработка команд reset и bye. Подпрограмма do_reset () отправляет на сервер команду reset и проверяет код результата. Подпрограмма do_bye( ) отправляет на сервер команду bye, но в этом случае не проверяет код результата, поскольку программа так или иначе должна завершить работу.