TripletaiL Japanese Web Application Framework
iniファイルを利用し設定情報を読み書きしてみましょう。
#!/usr/local/bin/perl
use strict;
use warnings;
use Tripletail qw(tl.ini);
$TL->startCgi(
-main => \&main,
);
sub main
{
my $t = $TL->newTemplate('template.html', 'utf8');
my $ini = $TL->newIni('config.ini');
$ini->set(SetStr => 'status' => '1');
$ini->write('config.ini');
$t->expand(
STR => $ini->get(SetStr => 'str1'),
);
$t->flush;
}
[TL]
[SetStr]
str1 = 設定された文字列です
<!DOCTYPE html>
<HTML>
<BODY>
<&STR>
</BODY>
</HTML>