削除ボタンを押すとperlにてデータを削除するようにしたいんですができません。

Question

フォーム.html(一部)

クライアント（ロードサイド）
※前のページへ戻る場合には、ブラウザの戻るボタンでお戻りください。

このデータを削除する場合には、下の削除ボタンをクリックしてください。
※この作業は取り消しができませんので、よく確認してから削除ボタンをクリックしてください。

この「物件ＮＯ：」のボタンを押すとadmin.cgiに飛びデータファイル内のデータを空にします。 ----------------admin.cgi---------------------------------- if($param{'mode'} eq 'del'){ ##===================================== ## 物件データをオープン = ##===================================== if($param{'group'} eq '1'){ $datafile = $datafile1;} elsif($param{'group'} eq '2'){ $datafile = $datafile2;} elsif($param{'group'} eq '3'){ $datafile = $datafile3;} if(!stdio::lock($lock)){ error('システムエラー','只今混み合っております.'); }# ロック if(!open(DATA,"+<$datafile")){ stdio::unlock($lock); &error('システムエラー',"ファイル ( $datafile ) をオープンできませんでした。"); } @data = ; foreach(@data){ @data2 = split(/,/); if($data2[0] eq $param{'data_num'}){ $_ = ''; last; } elsif($data2[0] eq $param{'data_num2'}){ $_ = ''; last; } } seek(DATA,0,0); print DATA @data; truncate(DATA,tell(DATA)); close(DATA); stdio::unlock($lock); ##===================================== ## テンプレートオープン = ##===================================== if(!open(HTML,$html_finish)){ &error('システムエラー',"ファイル ( $html_finish ) をオープンできません。"); } @html = ; close(HTML); ##===================================== ## HTML出力 = ##===================================== print <<"EOF"; Content-type: text/html @html EOF exit; }# モード del ここまで ----------------------------------------------------- この「data_num2」の削除には成功するんですが「data_num」の場合はボタンを押しても何も起こりません。恐らく「data_num」のif文に行っていないのだと思うんですが、何が原因か分かりません。情報が少ないかもしれませんが解決の糸口をお願いします。データはcsv形式のファイルです。

fujillin · Accepted Answer

全体がよくわかりませんが…

＞この「data_num2」の削除には成功するんですが
＞「data_num」の場合はボタンを押しても何も起こりません。
「data_num2」と「data_num」のHTMLの違いが読み取れないけれど、HTMLを見るとPOST送信のformで、imputボタンを押すとスクリプトでロケーションを操作しているみたいですけど？（GET送信になっている？）
submitボタンは設置していないのでしょうか？

まずは、各ケースでperl側で正しくパラメータを取得できているかをチェックしてみてはいかがでしょうか？

削除ボタンを押すとperlにてデータを削除するようにしたいんですができません。

全体がよくわかりませんが…

似たような質問が見つかりました

関連するカテゴリからQ&Aを探す

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング