您查看的文章来源于http://www.oklinux.cn
在编制PERL程序时，经常会用到很多相似的HTML代码。这样不但书写起来会很麻烦，而且一旦要改动页面，而程序很大，那就更麻烦了。
解决这样的问题一个好的方法就是使用模板。通常的模板使用方法有两种：
一种是将固定部分的HTML代码提取出来生成模板文件，不同的部分在模板上作一个标记。生成页面时，找到标记，将其替换成你想要输出的部分。
另一种是将固定部分的HTML代码提取出来作为一个函数，不同的部分在函数中设定参数。生成页面时，将要输出的部分作为参数传递给模板函数。
这两种方法基本上是异曲同工，但第一种借助DREAWEAVER，FRONTPAGE等编辑工具修改起界面来，应较为简单。而第二种输出显示时较为灵活。大家可根据需要灵活选择。
下面用两个简单的实例来介绍模板的基本用法。希望能起到抛砖引玉的作用。
用第一种方法：
show.htm ##模板文件
show.cgi ##程序文件
print "content-type:text/html\n\n";
$show_replace="welcome to here";
open(SHOW,"$filepath/show.htm");
while();
{$_=~s//$show_replace/g;
print "$_";
}
用第二种方法：
sub show_template
{
$show_replace=@_;
print <
$show_replace
SHOW
}
sub show
{
$show_replace="welcome to here";
&show_template($show_replace);
}
以上是两种最简单的模板的应用。在现实应用中肯定不会如此简单。但只要你理解了这种思想，你就能举一反三，用起来也会得心应手。
|
