Рассмотрение приложения Restaurant.hdml

Как и приложение, основанное на WML, Restaurant.hdml позволяет отображатьадрес и номер телефона, используя для этого портативное устройство пользователя. Кроме того, при желании, пользователь также может автоматически позвонить в ресторан. Приложение Restauranthdml реализуется с помощью следующего программного кода на HDML:

&ltHDML Version=3.0 Markable=True TTL=0&gt

&ltChoice Name=GetRestType Key=RestType&gt

&ltAction Type=Accept Label=Pick Task=GO Method=Post PostData=$RestType Dest=../waplibcgi/RestCallTypeHDML.pl&gt

&ltCenter&gtRestaurants

&ltCE Value="American"&gtAmerican &ltCE Value="Chinese"&gtChinese &ltCE Value="FastFood"&gtFast Food &ltCE Value="HealthFood"&gtHealth Food &ltCE Value="Italian"&gtItalian &ltCE Value="Mexican"&gtMexican &ltCE Value="Seafood"&gtSeafood

&lt/Choice&gt

&lt/HDML&gt

Первый элемент в файле сообщает браузеру (или другим программистам) информацию о версии спецификации HDML, поддерживаемой приложением. Крометого, параметр Markable=True определяет, что браузер может устанавливать наHDML-странице закладку (Bookmark), а параметр TTL=0 предписывает браузеру невыполнять кэширование HDML-страницы. Для предоставления пользователювозможности указывать тип предпочитаемой кухни приложение использует элемент <Choice>. Затем приложение запускает Peri-сценарий RestCallTypeHDML.pl,чтобы отобразить на экране список названий ресторанов, из которых пользователь может сделать свой выбор. Peri-сценарий RestCallTypeHDML.pl реализуется спомощью следующего программного кода: #!/usr/bin/perl

read (STDIN, $RestType, $ENV{'CONTENT_LENGTH'});

if ($RestType eq "American")

{ $Deck = "Content-type: text/x-hdml

&ltHDML Version=3.0 Markable=True TTL=0&gt

&ltChoice Name=GetAmerican Key=RestName&gt

&ltAction Type=Accept Label=Pick Task=GO Method=Post PostData=\$RestName Dest=RestCallAmerHDML.pl&gt