mihi~star <mihi@childstar.club.ne.jp> writes:

> 何でこんな解説記事を書いたかというと、チャットでこの話題に
> なった時に索いた、アルクの英辞郎のWebサービスが面白かった
> からなのです。
> http://www2.alc.co.jp/ejr/index.php?word_in=%96G%82%A6&word_in2=%82%A0%82%A2%82%A4%82%A6%82%A8&word_in3=aPkPgGCbGkMSMnEJmY
>
> 例えば、「妹」と検索すると、こういう例文が出てきます。
> http://www2.alc.co.jp/ejr/index.php?word_in=%96%85&word_in2=%82%A9%82%AB%82%AD%82%AF%82%B1&word_in3=aPkPgGCbGkMSMnEJmY
>
> fallをキーにすると、こんな感じです。
> http://www2.alc.co.jp/ejr/index.php?word_in=fall&word_in2=%82%A9%82%AB%82%AD%82%AF%82%B1&word_in3=aPkPgGCbGkMSMnEJmY
>
> もしかすると、トップ・ページからでないと見れないかもしれません。
> トップ・ページはここです。 -> http://www.alc.co.jp/
>
> HTMLブラウザーのバージョン・チェックがあって、w3mとかだと
> 見れないのが残念です。これさえなければ、普段から使うのになぁ。

本当ですね。トップ・ページからでも見れませんでした。

ちょっと、くやしかったので、
Message-ID: <bq46rn$ma8$1@news.sfc.keio.ac.jp>
を参考にして、

(eval-after-load "w3m-search"
  '(add-to-list
    'w3m-search-engine-alist
    '("ejr" "http://www2.alc.co.jp/ejr/index.php?word_in=%s&word_in2=%82%A0%82%A2%82%A4%82%A6%82%A8&word_in3=aPkPgGCbGkMSMnEJmY" shift_jis)))

(defun ejr ()
  (interactive)
  (let ((w3m-user-agent "Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0)")
        (w3m-search-default-engine "ejr"))
    (call-interactively 'w3m-search)))

として、M-x ejr 読めました :)

P.S.

(w3m-url-decode-string "http://www2.alc.co.jp/ejr/index.php?word_in=%96%85&word_in2=%82%A9%82%AB%82%AD%82%AF%82%B1&word_in3=aPkPgGCbGkMSMnEJmY")
"http://www2.alc.co.jp/ejr/index.php?word_in=妹&word_in2=かきくけこ&word_in3=aPkPgGCbGkMSMnEJmY"

`かきくけこ' ってなんだろう…。

-- 
Hiroshi Fujishima