在编制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