http://zc8mkt.sa.yona.la/1 |
返信 |
遠のいていく あの頃の記憶。
少しづつ少しづつ 思い出になっていく。
サクっと遊べる KORG DS-10 KORG DS-10公式ガイド |
返信 |
買い物 | |
マニュアルは見ないでいじって覚える派なんだけど、いっぱいあるツマミがどういう機能なんだかあんまり理解できないので買ってみた。
なんか本買ったのって結構久々かも。
http://xmny3v.sa.yona.la/214 |
返信 |
かえってきたー
うちのAspire One |
返信 |
青と白の2台あるんです(笑)。
白はWebサーバー、メールサーバー、SHOUTCastサーバー、FTPサーバーとして使ってる。順調に稼動中。
青は布団サイドマシンとして活躍中。こんな高機能のマシンが4万円台だなんて便利な世の中になったもんだ(5万円台の時に買ったんだけれども・・・)。
Haskell で grep を読んで |
返信 |
haskell | |
http://d.hatena.ne.jp/mzp/20081009/grep を見てたら書きたくなったので書いたというか、コピペして短くしたれと思ったら逆に冗長になったというか。
というわけでこんな感じにしてみました -> http://gist.github.com/16494
もともと Perl 使いなので ARGF よりもダイヤモンド演算子<> のほうがみやびに思えるからそういう演算子を定義した上でそれを前置で使ってます。ふつうは演算子の前置は部分適用とかに使うんですがそういうのとも違います。より Perl っぽく見せるためです。じゃあ Perl で書けよ。そうですね。
あ、型も微妙に変えてます。
argf :: [String] -> (String -> IO ()) -> ()
(<>) :: [String] -> (String -> a) -> IO a
えーと、渡すのは pure function のほうがよくね？というのと IO () だけにしか使えないのは不便じゃねっていう感じですね。
でもほんとうは、 http://gist.github.com/16495 みたく書けたらうれしいなと思っています。
コマンドライン引数を明示的に渡さなくてもいいし、さらに getArgs すら要らないっていう。
State か何かを使えばできそうなので誰か作ってください。
あ、そういえば地味にモジュール (Text.RegexPR) 使ってます。cabal install regexpr するか適当にソースを削るかコメントアウトすると動くと思います。