Пособие по написанию WAP-сайтов


Подробнее о сценарии языка Perl WapMail.pl - часть 2


Имя mailprog является просто указателем на программу пересылки почты. Приложение использует знак конвейера"|", потому что открывает программу и передает ей данные по конвейеру посредством print


Первая строка сценария является всего лишь комментарием, сообщающим интерпретатору командной строки, где находится интерпретатор языка Perl. Втораястрока сообщает этому интерпретатору, что исходный сценарий требует другойсценарий DeckUtils.pl из SDK и содержит функцию ParseCGIVars, которая извлекает пары данных имя/значение, передаваемые сценарию из карты Confirm. Далее сценарий для сокращения записи присваивает переменной mailprog строковое значение полного пути к программе


Приложение анализирует список параметров (которые передаются из картыConfirm) и присваивает извлеченные значения переменным SendTo, ReplyTo,MsgSubject и MsgText. Далее, приложение запускает почтовую программу и использует print для адресации сообщения, ввода текста сообщения и так далее.Как вы видите, приложение присваивает значение ReplyTo заодно и значениюFrom сообщения. Значение From сообщает приложению, что оно было послано отDemo@waplib.com (вы можете изменить это значение, ссылаясь на свой собственный сайт в Сети). Значение ReplyTo, в отличие от From, определяет адрес, покоторому будет передан ответ, если получатель сообщения захочет на него ответить (значение ReplyTo соответствует значению, введенному пользователем призапуске приложения).


После того как сценарий закрывает почтовую программу, она пересылает сообщение получателю. Далее, сценарий создает новую деку, сообщающую об успешной пересылке сообщения.





Начало  Назад  Вперед