鬼ブクマ

http://d.hatena.ne.jp/./kbehind/20051021#1129897867
ディアスポラの感想書いた人は、もはやのがれることはできんのです。
自分の場合、 ~/.w3m/keymap に

keymap  C-b  GOTO file:/cgi-bin/boo

と追加、~/cgi-bin/boo として以下のスクリプトを置いときます。読んでるページで CTRL-B とすればブクマされます。

#! /bin/csh -f
set id = ita
set tag = "ディアスポラ"


echo "content-type: text/html"
echo

set url2 = `echo $W3M_URL | \
 sed "s/:/%3A/g" | sed "s/\//%2F/g"|sed "s/#/%23/g"|sed "s/\?/%3F/g"`
## Cygwin
set tagname = `echo $tag|iconv -f Shift-JIS -t UTF-8`
##Linux
#set tagname = `echo $tag|iconv -f EUC-JP -t UTF-8`

w3m -dump_source \
"http://b.hatena.ne.jp/"$id"/add?mode=confirm&url="$url2 |\
gzip -cd - | \
egrep -v "tipjar|hoge|breadcrum" | \
sed 's/<head>/<head><base href="http:\/\/b.hatena.ne.jp\/'$id'\/">/' | \
sed 's/id="comment" value=""/id="comment" value="['$tagname']"/'