* まもなく移轉
當サイトはまもなく移轉します。
* みっくみく事件の決着
驚いた。ドワンゴが殆ど完全に折れる形で、しかもこんなに早く決着が付くとは思はなかった。こんな結末になるとは夢にも思はなかった。
* Quốc ngữ と日本語
ベトナム語は六つの聲調を持つ言語であるが、現在それを表記する爲に用ゐられてゐる Quốc ngữ ではその六声調を書き分ける事が出來るらしい。
* 自然物と信仰/生體機械としての人間/初音ミク/オープンソース戰爭
みっくみくが JASRAC された件には非常にもやもやとさせられる。だから出來るだけ消化しようと試みた。Every man thinketh his burden is the heaviest.
* HsHyperEstraier 0.1
HyperEstraier の Haskell 用バインディングである HsHyperEstraier を公開した。
_
domingo, 6 mayo 2007
Cuenta Larga = 12.19.14.5.4; tzolkin = 2 Kan; haab = 12 Uo
[Trackback Ping]
プログラマの入社試驗でゴルフをさせると云ふのはどうか。
問1. 第一引數をクエリ文字列として Google の檢索結果上位3位までのページタイトルと URL を stdout に出力するスクリプトを perl で 200 バイト以内で書きなさい。CPAN に存在する任意のモジュールを使って良く、實行時間は問はない。
解答例
use IO::All;$a=io("http://google.com/search?q=$ARGV[0]");$a->ua->agent('');$_=$a
->all;for($i=0;$i<3;$i++){m!<a href="([^"]+)" class=l>(.+?)</a>!g;print$1;($b=$2
)=~s!</?b>!!g;print"\t$b\n"}
190バイト。IO::All::LWP使用。面白くない。
2002
10
11
12
2003
1
2
3
4
5
6
7
8
9
10
11
12
2004
1
2
3
4
5
6
7
8
9
10
11
12
2005
1
2
3
4
5
6
7
8
9
10
11
12
2006
1
2
3
4
6
7
8
9
10
11
12
2007
1
2
3
4
5
6
7
8
9
10
12
2008
1
4