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


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


Втораястрока информирует интерпретатор языка о том, что этот сценарий требуеттакже для работы сценарий языка Perl DeckUtils.pl.


Сценарий DeckUtils.pl поставляется совместно с SDK и содержит функцию РагseCGlVars, извлекающую пары данных имя/значение, которые передает сценарию карта Confirm. Далее, сценарий просто определяет символ для краткой записи, имеющий имя mailprog. После этого приложение анализирует список полученных параметров (которые передает ему карта Confirm формата WML) дляизвлечения переменных SendTo, ReplyTo и MsgText. После этого приложениезапускает почтовую программу и использует print для адресации собщения, ввода текста сообщения и так далее. Как было сказано, сценарий всего лишь пересылает почту на телефоны Sprint PCS. Если вы проанализируете исходный код, выувидите, что он присоединяет адрес электронной почты@messaging.sprintpcs.com к адресу SendTo:

$SendTo .= "\@messaging.sprintpcs.com";


Далее, сценарий закрывает почтовую программу, которая сама посылает сообщение получателю. После этого он создает новую деку, которая отображает дляпользователя посланное сообщение. Сценарий пересылает сообщения посредством сети Sprint PCS. Для передачи сообщения пользователю, используещему услуги другого провайдера, вы должны знать адрес для сообщений этому провайдеру и необходимый формат данных. К примеру, компания AT&T использует 10-значный номер телефона, такой же, как и Sprint. К ней вы можете обратиться поадресу @mobile.att.net.





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