perlに詳しい方以下のようなﾌｫｰﾑがあったとします｡ <form name="form1"> <input type="submit" name="a" value="abc"> <input type="submit" name="b" value="def"> …

人力検索はてな

ﾓﾊﾞｲﾙ版を表示しています｡PC版はこちら

perlに詳しい方
以下のようなﾌｫｰﾑがあったとします｡
<form name="form1">
<input type="submit" name="a" value="abc">
<input type="submit" name="b" value="def">
</form>
このように､ひとつのﾌｫｰﾑの中に送信ﾎﾞﾀﾝが複数あるときに､処理を振り分けるにはどうすればよいかお願いします｡
※今回はwindows上だけで行います｡

●質問者: Hiroto
●ｶﾃｺﾞﾘ:ｺﾝﾋﾟｭｰﾀｳｪﾌﾞ制作
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

▽1 ● うぃんど

ﾍﾞｽﾄｱﾝｻｰ

ﾊﾟﾗﾒｰﾀが存在するかどうかで確認します
(例として､どちらも存在しない場合も入れてあります)

if ($query->param('a')) {
 print 'aaaaaaa';
} elsif ($query->param('b')) {
 print 'bbbbbbb';
} else {
 print 'ccccccc';
}

このあたりはperlの仕様ではなくHTMLﾌｫｰﾑの仕様によるものなので､
perlに詳しいかどうかは実はあまり関係なかったりもします

▽2 ● type-a

name 属性は重複しても構わないので､

<input type="submit" name="submit" value="abc">
<input type="submit" name="submit" value="def">

として､perl で
my $submit = $input->param('submt') || '';
if($submit eq 'abc'){
print 'A';
}elsif($submit eq 'def'){
print 'B';
}else{
print 'C';
}

で得られます｡