w3m その8

w3m その8 (738ﾚｽ)
上下前次 1-新
通常表示 512ﾊﾞｲﾄ分割ﾚｽ栞

648: 名無しさん＠お腹いっぱい。 [] 2019/09/06(金) 18:30:16.64

#!/bin/zsh
test "${QUERY_STRING%%&*}" != $(basename $( factor $PPID |md5sum )) \
&& UNIQ=$(basename $( factor $PPID |md5sum ))
case "$UNIQ$QUERY_STRING" in
rotate\&*) # 次のページへ、時間指定等の対応。
URL="https://www.google.co.jp/search?$( cut -d '&' -f 3- <<<$QUERY_STRING )"
UNIQ=$(basename $( factor $PPID |md5sum ));;
decode\&*) # ここから再検索して下さいの対処。
URL="https://www.google.co.jp/search?\
$(nkf --url-input <( sed 's/$[^&]*&$\{2\}//; s/%25/%/g' <<<$QUERY_STRING ))"
UNIQ=$(basename $( factor $PPID |md5sum ));;
${UNIQ}*) #default, またはformから流れてくるもの。
URL="https://www.google.co.jp/search?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 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?%\1https://www.google.co.jp/url?%g;'\
's%$<a [^>]*href="$/search?$[^"]*"$'\
'%\1file:///cgi-bin/google.zsh?${UNIQ}\&rotate\&\2%g'
w3m-control: VIEW
$( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} )

EOF

http://mevius.5ch.net/test/read.cgi/unix/1185784998/648

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

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

ぬこの手ぬこTOP 0.008s