バーンアウトの反対でボーアウト（社内ニート症候群）というものがあるらしい。

ボーアウト 社内ニート症候群
ヴェルダー・ペーター・R,フィリップ・ロートリン
講談社 / ￥ 1,260 ()
通常24時間以内に発送

でも、なんかとってつけたような言葉だった。

そういえばdaemontoolsのpってなんじゃろか？

prw------- 1 root root  0  2月 13 10:49 control
-rw------- 1 root root  0  2月 13 10:49 lock
prw------- 1 root root  0  2月 13 10:49 ok
-rw-r--r-- 1 root root 18  2月 13 10:59 status

追記 090215

pは名前付きパイプらしい。今度これやってみよう。

鶏の飼育まわりに関して、ヒヨコの視点で。なんか幽体離脱とかいって視点があちこちにとぶのでちょっと読みづらい。あと、ヒヨコの視点のはずなのに設備の話とか妙に小難しかったりとか。

ヒヨコのつぶやき
前田 義弘
文芸社 / ￥ 1,260 ()
通常5～7日以内に発送

• 今は品種改良で羽根の生えかたで雄雌がわかるようになっている
• つついて殺すのを避けるために嘴をちょん切る

macbookでaserveがうまく動かせないのでhunchentootを使ってる。日本語の通しかたをみつけたので早速。あとcl-whoもちょっといじってみた。

(require :hunchentoot)
(require :cl-who)
(setq *server* (hunchentoot:start-server :port 4242))
(setf (hunchentoot:log-file) "./server.log")
(setq hunchentoot:*hunchentoot-default-external-format*
     (flex:make-external-format :utf-8 :eol-style :lf))
(setq hunchentoot:*default-content-type* "text/html; charset=utf-8")
(setq hunchentoot:*dispatch-table*
     (list (hunchentoot:create-regex-dispatcher "^/$" 'hello-world)))
(defun hello-world ()
 (cl-who:with-html-output-to-string
     (str nil :prologue t)
   (:html (:head (:title "hello world"))
             (:body (:h1 "はろはろ リスプってますよ") (:br) (:img :src 
"http://ec2.images-amazon.com/images/I/51gfHrLAtTL._SS500_.jpg")))))

このながれで、hunchentootでblosxomクローンでもつくってみるかな。

setqについて書いた。

SLIMEのM-. M-, C-cC-mあたりがおもしろい

(incf x)をC-cC-mすると

(LET* ((#:G766 1) (#:NEW765 (+ X #:G766)))
  (SETQ X #:NEW765))

とマクロ展開される

タイトルと中身はちょっと違っていて「米関連で起業する」みたいな。

読んでてテンポもいいし内容も面白かったが、稼ぐ手段が如何に米の価値をあげるかではなくて、王道から外れることなのがちょっと気になった。

米で起業する!
長田 竜太
築地書館 / ￥ 1,680 ()
通常24時間以内に発送

• 商品の作り手のこだわりは買う側のこだわりを超えてはいけない。
  • これはキャズム的な解釈が出来るのではなかろうか。こだわりはコモディテイ化していくのでタイミングをはかる的な
• 足を引っ張るより手を引っ張る平等感

SBCLのasdf:oosとrequireの違いがわからないという、解決も何にもしてないただ疑問だけのエントリーを書いた。

あと、Slimy Hackathon面白そうだ。参加したいところだが、、、、

emacs+slime+clojure+processingでaction-codingのようなことがやれればと思っているんだけど。clojure+processingで再帰的な図形が描ければ楽しいと思うんだよなぁ。

計算機プログラムの構造と解釈
ジェラルド・ジェイ サスマン,ジュリー サスマン,ハロルド エイブルソン
ピアソンエデュケーション / ￥ 4,830 ()
通常24時間以内に発送

軽い読み物

どこまでやったらクビになるか―サラリーマンのための労働法入門 (新潮新書)
大内 伸哉
新潮社 / ￥ 714 ()
通常24時間以内に発送

新人採用の際の試用期間でも簡単に解雇できないという話と経歴を低く詐称してもダメなところは知らなかったので面白かった。

あと副業が禁止かどうかは単に契約上の問題で、長期雇用を前提としない流れだと、副業禁止で縛るほうが問題になってくるのかなぁと。

クローラーがたまに落ちるのでモダンperl入門にあったdaemontoolsを使ってみることにした。

モダンPerl入門 (CodeZine BOOKS)
牧 大輔
翔泳社 / 2940円 ( 2009-02-10 )

srpmはここからダウンロードしてきて

rpmbuild --rebuild daemontools-toaster-0.76-1.3.3.src.rpm

できたrpmをインストール。

fastladderのあるディレクトリ(僕の場合は/usr/local/fastladder)でdaemonとdaemon/logっていうディレクトリを作ってそれぞれのディレクトリにrunという実行ファイルを用意

daemon/run

1
2
3

#!/bin/sh
exec 2>&1
exec setuidgid root /usr/local/fastladder/script/crawler -e production

daemon/log/run

1
2

#!/bin/sh
multilog

リンク

chmod 1755 /usr/local/fastladder
ln -s /usr/local/fastladder/daemon /service/fastladder

あとはdaemontoolsで動かす。

参考: daemontoolsでデーモン管理

残りを読んだ。

モダンPerl入門 (CodeZine BOOKS)
牧 大輔
翔泳社 / ￥ 2,940 ()
通常5～7日以内に発送

6章はテスト。Apach::Testの使い方とか非常に参考になる。 8章はC APIとXS。これはあとでちゃんと読む(今回は流し読み)