Пока все идет хорошо, но что произойдет, если инициатором разъединения станет сервер? Поток do_read () обнаружит признак конца файла и завершит работу. И только цикл do_write (), выполняемый в основном потоке, обычно заблокирован в ожидании данных, поступающих из стандартного ввода, и поэтому не получит извещения о том, что произошло какое-то нарушение, до тех пор, пока не предпримет попытку записать строку текста в сокет и не активизирует сигнал PIPE. В клиенте с ветвлением эту ситуацию можно обойти, предусмотрев вызов функции exit () в об­работчике сигнала CHLD. В примере клиента с поддержкой многопоточности не воз­никает сигнал CHLD, который можно было бы перехватить, и поэтому проще всего можно выйти из положения, предусмотрев вызов функции exit () в потоке host_to_user ( ).

Подведем итоги. Многопоточная обработка предоставляет изящный способ достижения паралле­лизма в сетевых приложениях с установлением логического соединения. К сожале­нию, текущая реализация потоков в интерпретаторе Perl не совсем надежна, поэтому в следующей версии Perl этот API-интерфейс станет немного иным.

Предполагается, что в версиях Perl 6 будут представлены надежные средства мно­гопоточной обработки, и хотя API-интерфейс, вероятно, в чем-то изменится по сравнению с описанным в настоящем разделе, основные концепции создания, уничтожения и блокировки потоков останутся прежними.