w3m その8

w3m その8 (738ﾚｽ)
上下前次 1-新

639: 2019/09/06(金)01:07 AAS
明日か明後日には検索出来ない文字列と、時間指定の対応をする。

640: 2019/09/06(金)02:07 AAS
#!/bin/zsh

# これだけで良かったのか簡単になった。でも半分寝てるから何処か間違えてるだろう。

w3go ()
{
printf %s $1 |nkf -MQ |sed -n ':S $! {N; b S;}; s/=\n//g; s/=/%/g; p'
test $# -eq 1 || {shift; echo -n +; w3go $@}
}

UNIQ=$(mktemp -u XXXXXXXX)
case "$UNIQ$QUERY_STRING" in

${UNIQ}submit=1\&*) # formから流れて来た文字列は加工しない。
URL="外部ﾘﾝｸ:www.google.co.jp\
q=$( cut -d '&' -f 2- <<<$QUERY_STRING )&hl=ja&biw=&bih=&gbv=1&num=100"
;;
${UNIQ}dummy\&*) # 次のページへの対応。# 時間指定への対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )"
;;
*)
URL="外部ﾘﾝｸ:www.google.co.jp\
q=$( w3go $(nkf --url-input <<<$QUERY_STRING))&hl=ja&biw=&bih=&gbv=1&num=100"
;;
esac

641: 2019/09/06(金)02:08 AAS
<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL$NEXT
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%<form.*value="$.*$"[^>]*name="q".*/form>'\
'%<form action="file:///cgi-bin/google.zsh">'\
'<input name=submit type=hidden value=1>'\
'<input type=text value="\1"></form>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$%\1file:///cgi-bin/google.zsh?dummy\&\2%g'
w3m-control: VIEW
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF

EOF

642: 2019/09/06(金)03:07 AAS
何度もごめん見直して無い部分は大概間違ってるな。
そもそも最初testしてた時のcodeがまったくいらない。
まったく分けから無く見えてるなこれじゃ。

643: 2019/09/06(金)03:09 AAS
#!/bin/zsh
UNIQ=$(mktemp -u XXXXXXXX)
case "$UNIQ$QUERY_STRING" in
${UNIQ}submit=1\&*) # formから流れて来た文字列は加工しない。

URL="外部ﾘﾝｸ:www.google.co.jp\
q=$( cut -d '&' -f 2- <<<$QUERY_STRING )&hl=ja&biw=&bih=&gbv=1&num=100";;
${UNIQ}dummy\&*) # 次のページへの対応。# 時間指定への対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
*)
URL="外部ﾘﾝｸ:www.google.co.jp\
q=$QUERY_STRING&hl=ja&biw=&bih=&gbv=1&num=100";;
esac

<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%<form.*value="$.*$"[^>]*name="q".*/form>'\
'%<form action="file:///cgi-bin/google.zsh">'\
'<input name=submit type=hidden value=1>'\
'<input type=text value="\1"></form>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$%\1file:///cgi-bin/google.zsh?dummy\&\2%g'
w3m-control: VIEW
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF

EOF

644: 2019/09/06(金)07:26 AAS
#!/bin/zsh
#おかしいな寝る前は対処出来てたんだけど起きたら世界が変わってた。変な所を一度消す。
case "$QUERY_STRING" in
rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/[^&]*&//; s/%25/%/g' <<<$QUERY_STRING ))";;
*) #default, またはformから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp
esac

<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%<form.*value="$.*$"[^>]*name="q".*/form>'\
'%<form action="file:///cgi-bin/google.zsh">'\
'<input type=text value="\1"></form>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$%\1file:///cgi-bin/google.zsh?rotate\&\2%g'
w3m-control: VIEW
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF
w3m-control: DELETE_PREVBUF

EOF

645: 2019/09/06(金)18:14 AAS
#!/bin/zsh
test "${QUERY_STRING%%&*}" = $(basename $( factor $PPID |md5sum )) \
&& UNIQ=$(basename $( factor $PPID |md5sum ))

case "$QUERY_STRING" in
${UNIQ}\&rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 3- <<<$QUERY_STRING )";;
${UNIQ}\&decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))";;
*) #default, またはformから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp
UNIQ=$(basename $( factor $PPID |md5sum ));;
esac

<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%<form.*value="$.*$"[^>]*name="q".*/form>'\
'%<form action="file:///cgi-bin/google.zsh">'\
'<input type=text value="\1"></form>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}\&decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

646: 2019/09/06(金)18:15 AAS
# この星の一等賞んなりたいのw3mで俺は!そんだけ!

# 変数UNIQ関係は検索した文字列がcaseの命令と重ならないようにしている。
# それはw3mの起動ごとに変わるはず。もしかしたらいらないのかな。

647: 2019/09/06(金)18:18 AAS
あーまた間違える。さっきまでとまた世界が変わってる。

648: 2019/09/06(金)18:30 AAS
#!/bin/zsh
test "${QUERY_STRING%%&*}" != $(basename $( factor $PPID |md5sum )) \
&& UNIQ=$(basename $( factor $PPID |md5sum ))
case "$UNIQ$QUERY_STRING" in
rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 3- <<<$QUERY_STRING )"
UNIQ=$(basename $( factor $PPID |md5sum ));;
decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))"
UNIQ=$(basename $( factor $PPID |md5sum ));;
${UNIQ}*) #default, またはformから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp
esac

<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%<form.*value="$.*$"[^>]*name="q".*/form>'\
'%<form action="file:///cgi-bin/google.zsh">'\
'<input type=text value="\1"></form>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}\&decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

649: 2019/09/06(金)18:33 AAS
全然違うわ。なんなんだよ。

650: 2019/09/06(金)19:09 AAS
#!/bin/zsh
# あってるのかな。
UNIQ=$(basename $( factor $PPID |md5sum ))
if test "${QUERY_STRING%%&*}" != $UNIQ; then # default, またはformから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp

else case "$QUERY_STRING" in
${UNIQ}\&rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 3- <<<$QUERY_STRING )";;
${UNIQ}\&decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))";;
esac
fi

<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%<form.*value="$.*$"[^>]*name="q".*/form>'\
'%<form action="file:///cgi-bin/google.zsh">'\
'<input type=text value="\1"></form>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}\&decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

651: 2019/09/07(土)00:34 AAS
#!/bin/zsh
UNIQ=$(basename $( factor $PPID |md5sum ))
if test "${QUERY_STRING%%&*}" != ${UNIQ}=; then # default.
URL="外部ﾘﾝｸ:www.google.co.jp

else case "$QUERY_STRING" in
${UNIQ}=\&*) # formから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
${UNIQ}=\&rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 3- <<<$QUERY_STRING )";;
${UNIQ}=\&decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))";;
esac
fi
<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed \
's%Shift_JIS%UTF-8%g; s%$<form $$[^>]*>$'\
'%\1action="file:///cgi-bin/google.zsh" \2<input name="${UNIQ}" type=hidden>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}=\&decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}=\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

652: 2019/09/07(土)00:43 AAS
formから流れてくるものはqueryの変更をしない事にした。ニュースを検索したいのに「すべて」を
検索してしまう事への対応。
Shift_JISは変えないと、formから流れてくる文字の検索が失敗する。

大体これで前と一緒な感じがするな。ただ眠るとどうだろうな。
まあ誰か役に立てば。

653: 2019/09/07(土)01:02 AAS
はい間違えてる。なんなの俺。俺の頭どうしちゃったんだよ。

654: 2019/09/07(土)01:05 AAS
#!/bin/zsh
UNIQ=$(basename $( factor $PPID |md5sum ))
if test "${QUERY_STRING%%&*}" != ${UNIQ}=; then # default.
URL="外部ﾘﾝｸ:www.google.co.jp

else case "$QUERY_STRING" in
${UNIQ}=\&rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 3- <<<$QUERY_STRING )";;
${UNIQ}=\&decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))";;
${UNIQ}=\&*) # formから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
esac
fi
<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed \
's%Shift_JIS%UTF-8%g; s%$<form $$[^>]*>$'\
'%\1action="file:///cgi-bin/google.zsh" \2<input name="${UNIQ}" type=hidden>%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}=\&decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}=\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

655: 2019/09/07(土)01:13 AAS
あれ、これ駄目か、振り出しに戻ってるか。

656: 2019/09/07(土)01:22 AAS
#!/bin/zsh
UNIQ=$(basename $( factor $PPID |md5sum ))
if test "${QUERY_STRING%%=*}" != ${UNIQ}; then # default.
URL="外部ﾘﾝｸ:www.google.co.jp

else case "$QUERY_STRING" in
${UNIQ}=\&rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 3- <<<$QUERY_STRING )";;
${UNIQ}=\&decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))";;
${UNIQ}=1\&*) # formから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
esac
fi
<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%Shift_JIS%UTF-8%g; s%$<form $$[^>]*>$'\
'%\1action="file:///cgi-bin/google.zsh" \2'\
'<input name=$UNIQ type=hidden value="1">%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}=\&decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}=\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

657: 2019/09/07(土)01:23 AAS
あ、num=10のままになってるな。
これでもうもう間違いないっしょ。
だからnumは自分で変えてくんろ。

658: 2019/09/07(土)01:50 AAS
UTF-8に変える所にgは要らないな。このぐらいじゃ貼らないけど。

659: 2019/09/07(土)01:57 AAS
てか直さないと出力の中のも変えちゃうか。あーまた間違えてる。

660: 2019/09/07(土)02:05 AAS
#!/bin/zsh
UNIQ=$(basename $( factor $PPID |md5sum ))
if test "${QUERY_STRING%%=*}" != $UNIQ; then # default.
URL="外部ﾘﾝｸ:www.google.co.jp

else case "$QUERY_STRING" in
${UNIQ}=\&rotate\&*) # 次のページへ、時間指定等の対応。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 3- <<<$QUERY_STRING )";;
${UNIQ}=\&decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))";;
${UNIQ}=1\&*) # formから流れてくるもの。
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
esac
fi
<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%$<input[^>]*$Shift_JIS%\1UTF-8%; s%$<form $$[^>]*>$'\
'%\1action="file:///cgi-bin/google.zsh" \2<input name=$UNIQ type=hidden value="1">%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}=\&decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}=\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

661: 2019/09/07(土)02:08 AAS
良かった。気づいて。これは申し訳ないレベルだった。
よしもういいだろ。もういいだろ。

662: 2019/09/07(土)14:22 AAS
#!/bin/zsh
# より短く分かりやすく、無駄な事をしてる部分を削った。
UNIQ=$(basename $( factor $PPID |md5sum ))
if test "${QUERY_STRING%%=*}" != $UNIQ; then # default.
URL="外部ﾘﾝｸ:www.google.co.jp

else case "$QUERY_STRING" in
# formから流れてくるもの。# 次のページへ、時間指定等の対応。
${UNIQ}=form\&*|${UNIQ}=rotate\&*)
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
${UNIQ}=decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))";;
esac
fi
<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%$<input[^>]*$Shift_JIS%\1UTF-8%; s%$<form $$[^>]*>$'\
'%\1action="file:///cgi-bin/google.zsh" \2<input name=$UNIQ type=hidden value="form">%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}=decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}=rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

663: 2019/09/07(土)15:01 AAS
#!/bin/zsh
# 直し忘れの修正。
UNIQ=$(basename $( factor $PPID |md5sum ))
if test "${QUERY_STRING%%=*}" != $UNIQ; then # default.
URL="外部ﾘﾝｸ:www.google.co.jp

else case "$QUERY_STRING" in
# formから流れてくるもの。# 次のページへ、時間指定等の対応。
${UNIQ}=form\&*|${UNIQ}=rotate\&*)
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
${UNIQ}=decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/[^&]*&//; s/%25/%/g' <<<$QUERY_STRING ))";;
esac
fi
<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%$<input[^>]*$Shift_JIS%\1UTF-8%; s%$<form $$[^>]*>$'\
'%\1action="file:///cgi-bin/google.zsh" \2<input name=$UNIQ type=hidden value="form">%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}=decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}=rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

664: 2019/09/07(土)15:35 AAS
#!/bin/zsh
# ごめんこれだけで良かったの修正。
UNIQ=$(basename $( factor $PPID |md5sum ))

case "$QUERY_STRING" in
# formから流れてくるもの。# 次のページへ、時間指定等の対応。
${UNIQ}=form\&*|${UNIQ}=rotate\&*)
URL="外部ﾘﾝｸ:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";;
${UNIQ}=decode\&*) # ここから再検索して下さいの対処。
URL="外部ﾘﾝｸ:www.google.co.jp\
$(nkf --url-input <( sed 's/[^&]*&//; s/%25/%/g' <<<$QUERY_STRING ))";;
*) URL="外部ﾘﾝｸ:www.google.co.jp
esac

<<EOF
Content-Type: text/plain
w3m-control: GOTO $URL
w3m-control: VIEW
w3m-control: PIPE_BUF sed 's%$<input[^>]*$Shift_JIS%\1UTF-8%; s%$<form $$[^>]*>$'\
'%\1action="file:///cgi-bin/google.zsh" \2<input name=$UNIQ type=hidden value="form">%;'\
's%$<span[^>]*>\|</span>$%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\
's,$<a [^>]*href="$/url?q=/search%3F$q%3D[^"]*"$'\
',\1file:///cgi-bin/google.zsh?${UNIQ}=decode\&\2,;'\
's%$<a [^>]*href="$/url?%\1外部ﾘﾝｸ:www.google.co.jp\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}=rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

665: 2019/09/07(土)19:35 AAS
一応簡単に説明しくおくと、最近googleで検索してもlink先へ飛べなくなった事への対
処をしている。googleが送ってきたソースをsedで加工して表示している。<a></a>の中に
<div>があってそれが原因なので消しているだけ。
他にそのままgoogleを開いたまま検索した場合、検索は出来るが出てくるソースはまた
上で書いた問題を含む為、cgiを経由するように書き換える、だからまた同じようにsedで
加工されたページが表示される。その繰り返し。

666: 2019/09/07(土)19:37 AAS
いや、原因違うかも。まあ動いてるから良しとする。

667: 2019/09/07(土)19:40 AAS
やっぱちょっと違うな。<div></div>に変えて動いてるわけだからな。

668: 2019/09/07(土)19:41 AAS
これは動く。
<a href='test.html'>test<div></div></a>
これ駄目。
<a href='test.html'><div>test</div></a>

上下前次 1-新書関写板覧索設栞歴

あと 70 ﾚｽあります
ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ

ぬこの手ぬこTOP 0.011s