Чтобы отправить первый образец электронной выше, вы должны ввести, открытый (Sendmail, "| /USR /Lib /Sendmail -oi -t") или умереть "Не удается раскошелиться на Sendmail: $ \\ п"; печатать SENDMAIL От: Джон Смит: Мэри Тейлор Тема: Оплата взносов Дата: Пт, 21 Ноя 2010 9:55:00 -0000 Копия: Президент СК: полиции Я также хочу, чтобы вы знали, что сообщение электронной почты состоит из линий, и после каждой строки необходимо нажать клавишу ввода на клавиатуре, если вы набираете письмо в текстовом редакторе, и если адрес электронной почты будет отправлено в виде клавиш, через Интернет проволоки без изменений. С уважением, Джон Смит EOF близко (SENDMAIL) или предупредить "Sendmail не закрывается должным образом"; Выше первый образец электронный но с Perl кода, установленного на нем. Он по-прежнему считать, что вы вводите код, указанный выше в том числе особенностей Perl в текстовом редакторе. Первая строка начинается с открытой функции Perl. Он имеет два аргумента. С заявлением в Perl заканчивается точкой с запятой. Первое утверждение выше, могут принять две строки. Есть две части к первому заявлению выше. Первая часть является открытым функция. Если открытый функция не выполняется, то вторая часть будет сообщить об ошибке. Не беспокойтесь слишком много о второй части, но иметь его в своем коде. Давайте посмотрим на аргументы в открытом функции. Первый аргумент, Sendmail является примером того, что называется дескриптор. Дескриптор файла представляет собой особый тип переменной. В настоящее время код по электронной почте Perl является предположить, что в сервере (например, веб-сервер). Этот адрес электронной код придется ехать через сеть Интернет, чтобы прибыть в какой-то сервер электронной почты. Для того, чтобы это движение, которое состоится, вы должны дескриптор. Файлового дескриптора выше объявлены и косвенно была назначена там, как указано; Вы не видите назначение. Вы можете дать любое имя вы хотите для этого дескриптора. Не перед ним знака $; это особый тип переменноОтправка веб-форму набора данных, как письмо с Activeperl