w3m その8 (738レス)
上下前次1-新
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> 
669: 2019/09/07(土)19:50 AAS
 ただ面倒なので、duckduckgoがお勧め。 
670: 2019/09/08(日)01:27 AAS
 #!/bin/zsh 
 # factorを変更しただけ。 
 UNIQ=$(basename $(ps -p $PPID -o pid,ppid,egroup,euser,lstart |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 ))";; 
 *) # default. 
 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 
671: 2019/09/08(日)01:40 AAS
 #!/bin/zsh 
 # bsdのmanにはeuserとかの指定の仕方は無かったので変えただけ。 
 # そもそもたぶんここ要らないと思うんだけど改造する時の使い道としてまあやっとく。 
 UNIQ=$(basename $(ps -p $PPID -o pid,ppid,group,user,lstart |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 ))";; 
 *) # default. 
 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 
672: 2019/09/08(日)01:55 AAS
 このぐらいの変更で貼り付けないけど、gidとuid使ったほうがいいのかも。 
673: 2019/09/08(日)01:57 AAS
 UNIQ=$(basename $(ps -p $PPID -o pid,ppid,gid,uid,lstart |md5sum))  
 ここの話しね。 
674: 2019/09/08(日)02:52 AAS
 UNIQ=$(printf $(ps -p $PPID -o pid,ppid,lstart |md5sum)) 
 このぐらいでいいな。後printfの方が速いな。 
 いまいちここ好きじゃなんだよな。 
675(1): 2019/09/08(日)15:05 AAS
 #!/bin/zsh 
 # すまんnkfとか無くてももっと簡単な事だった。 
 # 後<span>を削る必要は無いけど扱いやすくなるから残しとく。 
 UNIQ=$(printf $(ps -p $PPID -o pid,ppid,lstart |md5sum)) 
  
 case "$QUERY_STRING" in 
 # formから流れてくるもの。 
 ${UNIQ}=form\&*) 
 URL="外部リンク:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";; 
 ${UNIQ}=rotate\&*) # 次のページへ、ここから再検索して下さい、時間指定等の対応。 
 URL="外部リンク:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";; 
 *) # default. 
 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="\)/\(search?\|url?q=/search%3F\)\([^"]*"\)'\ 
 ',\1file:///cgi-bin/google.zsh?${UNIQ}=rotate\&\2\3,g;'\ 
 's%\(<a [^>]*href="\)/url?%\1外部リンク:www.google.co.jp 
 w3m-control: VIEW 
 $( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} ) 
  
 EOF 
676: 2019/09/09(月)02:05 AAS
 最後にちょっとだけ拡張してみた。これでそろそろ辞めるわ。 
 変数大文字ですまんな、なんかそうなってしまった。 
 まあまた間違いのラッシュだろけど。 
  
 現在のurlが一番上に表示されるようにしたからそれを見ながら、 
 二つ目のformにsedに渡す文字列を入力してsubmitするとその変更したurlに変わる。 
 だからs/ja/en/とすると英語のページに変わりますよという事。 
677: 2019/09/09(月)02:13 AAS
 #!/bin/zsh 
 # やられた停電だよ。まじか。 
 UNIQ=$(printf $(ps -p $PPID -o pid,ppid,lstart |md5sum)) 
  
 case "$QUERY_STRING" in 
 ${UNIQ}=option\&*) 
 URL_HOLD=$(nkf --url-input <(sed 's%[^&]*&field=\([^&]*\)&.*%\1%' <<<$QUERY_STRING)) 
 URL=$(sed $(nkf --url-input <(cut -d '&' -f 3 <<<$QUERY_STRING |tr '+' ' ')) <<<$URL_HOLD) 
 test -z "$URL" && URL=$URL_HOLD;; 
 ${UNIQ}=form\&*) 
 URL="外部リンク:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";; 
 ${UNIQ}=rotate\&*) URL="外部リンク:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";; 
 *) URL="外部リンク:www.google.co.jp 
 esac 
678: 2019/09/09(月)02:14 AAS
 <<EOF 
 Content-Type: text/plain 
 w3m-control: GOTO $URL 
 w3m-control: EXTERN echo %s |xsel -s 
 w3m-control: VIEW 
 w3m-control: PIPE_BUF sed "s,<body [^>]*&\$(xsel -s |sed "s/&/\\\\\&/g")<br /;"\ 
 's%\(<input[^>]*\)Shift_JIS%\1UTF-8%; s%\(<form \)\([^>]*>\)'\ 
 '%\1action="file:///cgi-bin/google.zsh" \2<input name=$UNIQ type=hidden value="form">%;'\ 
 's,</form&<form action="file:///cgi-bin/google.zsh">'\ 
 '<input name=$UNIQ value="option" type=hidden>'\ 
 '<input name=field value='"\$(xsel -s |sed "s/&/\\\\\&/g")"' type=hidden>'\ 
 '<input type=text></form;'\ 
 's%\(<span[^>]*>\|</span>\)%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\ 
 's,\(<a [^>]*href="\)/\(search?\|url?q=/search%3F\)\([^"]*"\)'\ 
 ',\1file:///cgi-bin/google.zsh?${UNIQ}=rotate\&\2\3,g;'\ 
 's%\(<a [^>]*href="\)/url?%\1外部リンク:www.google.co.jp 
 w3m-control: VIEW 
 $( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} ) 
  
 EOF 
679: 2019/09/09(月)02:17 AAS
 そうだった。xsel -s使ってるから。xsel -sの内容消えるからね。 
680: 2019/09/09(月)02:43 AAS
 #!/bin/zsh 
 UNIQ=$(printf $(ps -p $PPID -o pid,ppid,lstart |md5sum)) 
  
 case "$QUERY_STRING" in 
 ${UNIQ}=option\&*) 
 URL_HOLD=$(nkf --url-input <(sed 's%[^&]*&field=\([^&]*\)&.*%\1%; s/%25/%/g' \ 
    <<<$QUERY_STRING)) 
 URL=$(sed $(nkf --url-input <(cut -d '&' -f 3 <<<$QUERY_STRING |tr '+' ' ')) <<<$URL_HOLD) 
 echo $QUERY_STRING>>$HOME/debug 
 echo $URL>>$HOME/debug 
 echo $URL_HOLD>>$HOME/debug 
 test -z "$URL" && URL=$URL_HOLD;; 
 ${UNIQ}=form\&*) 
 URL="外部リンク:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";; 
 ${UNIQ}=rotate\&*) 
 URL="外部リンク:www.google.co.jp cut -d '&' -f 2- <<<$QUERY_STRING )";; 
 *) URL="外部リンク:www.google.co.jp 
 esac 
681: 2019/09/09(月)02:44 AAS
 <<EOF 
 Content-Type: text/plain 
 w3m-control: GOTO $URL 
 w3m-control: EXTERN echo %s |xsel -s 
 w3m-control: VIEW 
 w3m-control: PIPE_BUF sed "s,<body [^>]*&\$(xsel -s |sed "s/&/\\\\\&/g")<br /;"\ 
 's%\(<input[^>]*\)Shift_JIS%\1UTF-8%; s%\(<form \)\([^>]*>\)'\ 
 '%\1action="file:///cgi-bin/google.zsh" \2<input name=$UNIQ type=hidden value="form">%;'\ 
 's,</form&<form action="file:///cgi-bin/google.zsh">'\ 
 '<input name=$UNIQ value="option" type=hidden>'\ 
 '<input name=field value='"\$(xsel -s |sed "s/&/\\\\\&/g")"' type=hidden>'\ 
 '<input type=text></form;'\ 
 's%\(<span[^>]*>\|</span>\)%%g; s%<div[^>]*>%%g; s%</div>%<div>&%g;'\ 
 's,\(<a [^>]*href="\)/\(search?\|url?q=/search%3F\)\([^"]*"\)'\ 
 ',\1file:///cgi-bin/google.zsh?${UNIQ}=rotate\&\2\3,g;'\ 
 's%\(<a [^>]*href="\)/url?%\1外部リンク:www.google.co.jp 
 w3m-control: VIEW 
 $( printf '%s\n' 'w3m-control: DELETE_PREVBUF'{,,,} ) 
  
 EOF 
682: 2019/09/09(月)03:07 AAS
 >>675で完成してるからな。後は余興。ノシ。PC触り過ぎてきもちわり。 
683: 2019/09/09(月)07:23 AAS
 すまん。やっぱ寝ぼけてたな。$HOME/debugにfileを書き出してる。 
上下前次1-新書関写板覧索設栞歴
あと 55 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.025s