■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■               CGI3分クッキング                                  Vol:041                          発行日: 1999年12月07日                        総発行部数:     1880部                            (1999年12月07日現在) ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ ◆PR◆-------------------------------------------------------------------- ●もう、牛なしでは生きていけない・・・  京都で一番おいしい牛肉に選ばれました。  お正月は「いづつ屋」のお肉だね!  http://www.tanba-izutsuya.com/ --------------------------------------------------------------------◆PR◆ ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ ◆目次◆ ●Web新撰組ニュース ●今日の献立:熱血!検索君 ●予告 ●はぎちゃん今日のひとこと ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ ◆PR◆--------------------------------------------------------------------  ★☆★WIN!自動車総合保険”見積もりキャンペーン”実施中!★☆★  お見積り頂いた方に抽選で、【ラスべガス・バリ島旅行】プレゼント! click< http://a.clickincome.net/md/dk?mid=92389d5b6dff49bde203884c82a50ca4 > --------------------------------------------------------------------◆PR◆ ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ ●Web新撰組ニュース   メールを使った新しい遊びを追及する「メールで遊ぼう!」。   出会いの広場「みんなの掲示板」も登場!   http://www.web-kyoto.com/vmail/   へGO!   Web新撰組メンバー執筆のCGI参考書。   「Perlで作る楽しいCGI」は、エーアイ出版のエーアイムックNo.237。   内容についての御質問は、新撰組ML(http://www.web-kyoto.com/ml/)へ。 ●今日の献立:入力部分の続き   今回もデータ入力の続きです。   ところで、前回まで(その3)とか書いてましたが、書いてる本人が何回目な のかわかんなくなっちゃったので、やめました。   でいよいよ今回は入力部分の本体を・・・と行きたいところですが、前回まで の部分にあちこち間違いがありましたので訂正します。 1:データ形式の間違い   複数入力可の場合は、,区切りで入力して下さい、なんて表示しておきながら、   データの区切り文字も,にしてました。   そこで、データの区切り文字を、;に変更します。   先ず、book.dbはこのようになります(ここでは3行に分けて書きましたが、   必ず1行に書いて下さい)。 title;title_kana;author;author_kana;honyaku;syuurokusaki;syuurokusaki_kana; syuuroku;syuuroku_kana;country;syuppan;date;price;ISBN;group;kounyu;URL; URL_ALT;note   次に、検索部分の、 $rdb->set_delimiter('Read',',');   を $rdb->set_delimiter('Read',';');   にして下さい。 2:がない。   html表示部分の、$CgiTitleの次の行にを追加して下さ   い。 3:備考欄に改行が入らない。   備考欄には改行(
)を入れたいのですが、sub GetFormdata で、改行を全部   取ってしまっていたので、これを残すようにします。   こうなります。 sub GetFormdata { local($buffer,$name,$value,@pairs,%FORM); require 'jcode.pl'; if ($ENV{'REQUEST_METHOD'} eq "POST"){ read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); }else{ $buffer = $ENV{'QUERY_STRING'}; } @pairs = split(/&/,$buffer); foreach (@pairs) { ($name, $value) = split(/=/, $_); $value =~ tr/+/ /; $value =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack("C", hex($1))/eg; $value =~ s/[\r\n]//g; &jcode'convert(*value,'euc'); $value =~ s/\,/,/g; $FORM{$name} = $value; } return(%FORM); } 4:エラー処理部分がない   入力時にチェックをいれようとしたら、作ってない事に気づきました。   これは追加して下さい。 sub hserror { local($num,$word)=@_; print <<"EOL"; Content-type: text/html $CgiTitle エラー No.$num
$word
EOL exit; }   ますます不安になりつつ。。。続く ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ ◆予告◆------------------------------------------------------------------ ●次回こそは、データ入力部分の本体です ------------------------------------------------------------------◆予告◆ ◆PR◆-------------------------------------------------------------------- テクニカル分析の最高峰・柴田罫線で、買い時、売り時を見極める。  高的中率に定評ある「柴田罫線」ソフト+パソコンをプレゼント! click< http://a.clickincome.net/md/dk?mid=e4100b60c552ab0a4f264d44bca24c32 > ///////// やりたいって言ったら、今すぐやりたいんだい!! いや〜んえっちぃ〜〜、、、じゃないよ、ゲームのお話し。 欲しいソフトが発売日に手元に届きます。こりゃええわい。 てなわけで、こちらにどうぞ。 http://takafumi.grabit.net/powersoft/ --------------------------------------------------------------------◆PR◆ このメールマガジンは、 Subject部が、CGI3分クッキング【Vol.番号】は、まぐまぐ様にて、 ( http://www.mag2.com/ ) Subject部が、CGI3分クッキング Vol.【番号】は、Macky様にて、 ( http://macky.nifty.ne.jp/ ) Subject部が、CGI3分クッキング番号 は、Pubzine様にて、 配布致しています。 メールマガジンの解除について まぐまぐ様の解除は、 http://www.web-kyoto.com/dp/3min/ に、削除及び登録フォームを用意致しております。 Macky様の解除は、 http://macky.nifty.ne.jp/ を参考して下さい。 Pubzine様の解除は、 http://www.pubzine.com/srchid.asp?keyword=1379 に、削除及び登録フォームを用意致しております。 ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ ◆はぎちゃん今日のひとこと◆------------------------------------------  ●毎日腹筋運動をしています   最初1回も出来なかったのに、30回出来るようになりました。   でも体重は変わりません。   脂肪が減らずに筋肉が増えているのでは・・・ ------------------------------------------◆はぎちゃん今日のひとこと◆ ◆お願い◆ このマガジンについてのお問い合わせは、WEB新撰組メーリングリストで、 お願い致します。 はぎちゃんについての、麗しいお嬢様からのお問い合わせがないので寂しいです。 参加方法は、 http://www.web-kyoto.com/ml/ を参考にして下さい。 ◆担当者◆ 本文文責    :Web新撰組プログラマー萩原逸郎(はぎちゃん) Web新撰組  :http://www.web-kyoto.com/ ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■