введение в perl

Пример: Отправка данных по e-mail

Иногда вам может потребоваться, чтобы данные введенные в форму были посланы по некоторому адресу электронной почты.

Для этого вам потребуется программа посылки почты с интерфейсом командной строки. Под UNIX это может быть sendmail или mail. В данном примере данные посылаются с помощью программы sendmail. Вместо записи в файл мы используем запись в специально открытый канал (pipe):
# Адрес e-mail
$sendto = "webmaster@telesputnik.ru";
# Открываем канал
open (MAIL, "| /usr/bin/sendmail $sendto")
# Печатаем в канал в специальном формате
print MAIL "From: Web-серверn";
print MAIL "To: $sendton";
print MAIL "Subject: Ввод новых данных";
print MAIL "Кто-то воспользовался формой для ввода новых данных";
print MAIL "Вот что он ввел:";
print MAIL "Имя: ", $input{'user_name'},"n";
print MAIL "Компания: ", $input{'co_name'},"n";
print MAIL "Телефон: ", $input{'phone'},"n ";
# Посылаем письмо, закрывая канал
close (MAIL);

Другие статьи по теме:

- использование библиотеки mime-base64
- введение в perl
- почему я выбрал perl?
- аутентификация пользователей через веб-интерфейс
- повышение индивидуального мастерства дизайнера

Другие голосования

Приглашаем Вас обменяться кнопочками! Обращайтесь к администратору.

• Как выбрать браузер
• Средства структурного анализа и проектирования систем
• Классификация case-средств
• Case-технология проектирования программного обеспечения информационных систем
• Технология intranet
• Технологии Internet
• Средства доступа к базам данных
• Средства быстрой разработки прикладных программ
• Объектно-ориентированный подход к созданию программных средств
• Этапы проектирования при разработке программного продукта