Common lispならセットアップから実行まで13行でスクレイピング可能

おい、ヲタクのお前らlispに興味あるか?Webには?

無いって?

知ったことか

じゃあ始めよう

 

1.SBCLをインストールしよう。SBCLが何かって?ググってくれ

$ brew update
$ brew install sbcl
clispっていう処理系はアップデート止まってるから使わなくてよし

 

2.quick lispをインストール。quick lispとは?ググれ

$ curl -O http://beta.quicklisp.org/quicklisp.lisp
$ sbcl --load quicklisp.lisp

 

こっからはsbclのコンソールの操作だ

(quicklisp-quickstart:install)
(ql:add-to-init-file)

3.quick lisplispのライブラリをインストール
(ql:quickload :drakma)
(ql:quickload :plump)
(ql:quickload :clss)

4.コーヒーでも飲んで一息ついてくれ

5.以下コピペ
(defvar html (drakma:http-request "http://www.paulgraham.com/hp.html"))
(defvar parse-html (plump:parse html))
(plump:text (car (coerce (clss:select "title" parse-html) 'list)))

 

以上で「"Hackers and Painters"」と表示されたら問題ない

※ちなみに環境はmacOS 10.12

これはdev.toで書いた記事でリアクションは7つ付いた

lispやるならdev.to(英語圏)だね

Begginnig Common Lisp for web scraping

 

 

hey nerds, do you like web? interest lisp?
no?
i dont care
okay i do

Step1: install sbcl
$ brew update
$ brew install sbcl
(now, clisp is stopped update)

Step2: install quick lisp
$ curl -O http://beta.quicklisp.org/quicklisp.lisp
$ sbcl --load quicklisp.lisp

----------↓↓↓starting sbcl console↓↓↓-----

(quicklisp-quickstart:install)
(ql:add-to-init-file)

Step3: install libraries to sbcl by quicklisp
(ql:quickload :drakma)
(ql:quickload :plump)
(ql:quickload :clss)

Step4: drink a coffee

Step5: write codes and eval
(defvar html (drakma:http-request "http://www.paulgraham.com/hp.html"))
(defvar parse-html (plump:parse html))
(plump:text (car (coerce (clss:select "title" parse-html) 'list)))