简单的CGI+Template模块配合，使Html与perl互相分离

Template模块配合，使Html与perl互相分离。不错的选择！适合菜鸟们。
特写一个代码如上，以备后用！
注：
1,安装Template包，输入命令
perl -MCPAN -e shell
install Template
一直回车下来！
2,将TT页放在同级的ttdir目录下
3,将后缀.html改为.tt


#!/usr/bin/perl

use strict;
use CGI;
use Template;
BEGIN{
        use CGI::Carp qw(fatalsToBrowser carpout);
}

my $q = CGI->new;
my $config = {
        INCLUDE_PATH => 'ttdir',
    };
my $vars = {
        path_post =>'post.cgi',
 };
my $input = '2.tt';
my $tt = Template->new($config)||die "$Template::ERROR\n";
print $q->header(-type=>'text/html',-charset=>'gb2312');
$tt->process($input,$vars) || die $tt->error(), "\n";