> 2000/04/07 (金) 05:14:25 ▼ ◇ [mirai]> > テキストボックスに入れた値を別の検索エンジンに飛ばしたいんだが
> > その検索エンジンはスペースで単語を区切るのね。その時の処理はどうやって
> > 書けばいいんだ?以下を書き換えてスペースで区切るように改造したいんだが
> > if ($FORM{'method'} eq 'and') { $FORM{'word'} =~ s/ /+/g; }
> %20か+にしとけば半角スペースとして扱われると思うが
すまん。もう少し前後も書く。
if ($FORM{'method'} eq 'and') { $FORM{'word'} =~ s/ /+/g; }
else { $FORM{'word'} =~ s/ / or /g; }
$FORM{'word'} =~ s/(\W)/$escape{$1} ||= sprintf("%%%02X", ord($1))/eg;
if ($FORM{'word'} eq '') { print "Location: http://astalavista3.box.sk/\n\n"; }
else { print "Location: http://astalavista3.box.sk/cgi-bin/astalavista/robot?p=$FORM{'word'}&submit=+search+\n\n"; }
}
飛ばしたい検索エンジンはAstalavistaで半角スペースで区切ったキーワードに&submit=+search+
をつけるとアンド検索になるってことまでは分かったんだが、キーワードが半角スペースで区切れん
参考:2000/04/07(金)05時07分49秒