TripletaiL
Japanese Web Application Framework
複数のフォームがある状態で、特定のフォーム(input type=hidden
のタグ)をCGI側から制御します。
Webブラウザでアクセスし、HTMLソースを確認してみましょう。
#!/usr/local/bin/perl
use strict;
use warnings;
use Tripletail qw(/dev/null);
$TL->startCgi(
-main => \&main,
);
sub main
{
my $t = $TL->newTemplate('template.html', 'utf8');
$t->addHiddenForm($TL->newForm->set(Command => 'Search'));
$t->addHiddenForm($TL->newForm->set(Command => 'Delete'), 'form2');
$t->flush;
}
<!DOCTYPE html>
<HTML>
<BODY>
<form method="post">
<input type="submit" name="submit" value="検索">
</form>
<form name="form2" method="post">
<input type="submit" name="submit" value="削除">
</form>
</BODY>
</HTML>