>擬古描 2000/04/07 (金) 05:27:39 ▼ ◇ [mirai]> > すまん。もう少し前後も書く。
> > 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+
> > をつけるとアンド検索になるってことまでは分かったんだが、キーワードが半角スペースで区切れん
> ∧ ∧
> ~′ ̄(´ー`)<半角スペースを+にした後に%xx形式にエンコード
> UU ̄ U U してるからだと思うがどうだろうか?
if ($FORM{'method'} eq 'and') { $FORM{'word'} =~ s/ /+/g; }
$FORM{'word'} =~ s/(\W)/$escape{$1} ||= sprintf("%%%02X", ord($1))/eg;
はいらないってことかい?試したが
http://astalavista3.box.sk/cgi-bin/astalavista/robot?p=ABC%20DEF&submit=+search+
って感じで帰ってくるんだよね。んで半角スペースで区切れといわれる。
参考:2000/04/07(金)05時19分25秒