• 丰搜首页
• 文档中心
• 视频中心
• 丰搜贴吧
• 问题集锦
• 更多功能

选择显示字体大小

• 最大
• 较大
• 标准

perl与wap-程序举例

首先，我们建立一个名为“people_data.txt”的文本文件，来存放职员信息，内容如下：



# namephone numfax numtitle

cao jian123-4567098-7654director of os development

zhang san123-4568098-7655senior vp of os research



其中，“”符号是用来区别字段的，“#”是用来注释数据结构的。

为了说明使用perl来编写的必要性，我们先给出使用wml来显示这两名职员信息的卡片组，代码如下：



<?xml version="1.0"?>

<!doctype wml public "-//wapforum//dtd wml 1.1//en"

"http://www.wapforum.org/dtd/wml_1.1.xml">

<wml>



　<card title="telephone book" id="index">

　　<p>

　　　welcome to new inc. telephone book

　　　<a href="#view">click to view list</a>

　　</p>

　</card>



　<card title="list of names" id="view">

　　<p>

　　　<a href="#cao_info">cao jian - 123-4567</a>

　　　<a href="#zhang_info">zhang san - 123-4568</a>

　　</p>

　</card>



　<card title="info for cao jian" id="cao_info">

　　<p>

　　　director of os development

　　　phone number: 123-4567

　　　fax number: 098-7654

　　</p>

　</card>



　<card title="info for zhang san" id="zhang_info">

　　<p>

　　　senior vp of os research

　　　phone number: 123-4568

　　　fax number: 098-7655

　　</p>

　</card>
</wml>

[1] [2] [3]  下一页