CGI
2006年 10月 08日
そういえば、CGIは久しぶり。なんだか、MVC病です。いろいろと考えて進まない。
車輪の再発明でいいからどんどん進めてみるか。
#!c:/perl/bin/perl -w
use strict;
use lib './lib';
use CGI;
use HTML::Template;
my $q = new CGI;
print $q->header(-type => 'text/html', -charset => 'Windows-31J');
my $template = new HTML::Template(filename => 'html/menu.html', associate => $q);
print $template->output;
車輪の再発明でいいからどんどん進めてみるか。
#!c:/perl/bin/perl -w
use strict;
use lib './lib';
use CGI;
use HTML::Template;
my $q = new CGI;
print $q->header(-type => 'text/html', -charset => 'Windows-31J');
my $template = new HTML::Template(filename => 'html/menu.html', associate => $q);
print $template->output;
by smeg_head
| 2006-10-08 22:18
| web general