Have Your Own Perl! - JPerl Advent Calendar 2009 ここでなぞなぞです。Perlハッカーにとって最も必要なのは何でしょうか? Perlそのもの、ですよね。 そうなんです。どんなすばらしいPerlモジュールも、Perl本体がなければ動きません。Perlはモジュールがなく... 続きを読む
The requested blog was not found -- unless you requested that of Dan Kogai (小飼 弾). はじめにおことわりしておくと、ここで Chromium OS というのは私が build したものではなく(そんな暇も体力も今はなし)、親切な誰かが VMWare の disk image にしてく... 続きを読む
キタコレ。 ああ、恥ずかしい。 全裸より恥ずかしい。 勝間さんのオビがまた恥ずかしい。 しかし、一番恥ずかしいのは、自分の読書歴を晒すことかも。 「空気を読むな、本を読め。」、恥をしのんで、上梓です。 はじめに 1章 本を読め。人生は変わる 人生の8... 続きを読む
The requested blog was not found on this server -- unless you requested that of Dan Kogai (小飼 弾). 台風の風に起こされてみたら、素晴らしいニュースが。 livedoor ニュース - [ウィニー]2審は逆転無罪 著作権侵害ほう助認めずファイル共有ソフト「W... 続きを読む
というわけで、その傾向と対策を。 [Perl]UTF8-flagged strings affects regexps with the "i" modifier - use GFx::WebLog; Perlではutf8フラグ付きの文字列に対するuc/lc/"i"正規表現修飾子は非常に遅いのだが,H::F::Liteでは/iを使っているので,試しに/iを... 続きを読む
2009/09/16 「皆さん、光は見えたでしょうか?」 日経BP社が主催した開発者向けのイベント「XDev2009」の初日となった9月15日、「ITpro Challenge! 2009 Light」において、総合司会の小飼弾氏は会場に向かってそのように投げ掛けた。 本セッションは2007年から... 続きを読む
会場は東工大ではなく秋葉原UDXカンファレンスです。お間違いのないようお願いします。 なるべくノートパソコン持参でお願いします。もちろんネット接続可能なものを。 会場はネット接続可能な予定で、実習においてもそれを用いる予定です。万が一ネット接続が... 続きを読む
The requested blog was not found on this server -- unless you requested that of Dan Kogai (小飼 弾). 続きを読む
The requested blog was not found on this server -- unless you requested that of Dan Kogai (小飼 弾). おごちゃんが十八番を出したので、便乗しておくか。 おごちゃんの雑文 ? Blog Archive ? 「天才エンジニア」でIT業界は変わらないだから、いいか、技術... 続きを読む
先ほど投票をすませた。期日前投票するつもりが、結局その暇がなかったからだ。当日投票であれば投票所は我が家の隣。実は時間は最短で済む--はずだったのだが、思いもかけないことがそこで起きていた。 行列、である。 生まれて40年。有権者となって20年。生ま... 続きを読む
「今度は京都でやるのでは」という噂もあった YAPC::Asia::2009 ですが、会場は去年と同じ東工大大岡山キャンパスで、9/10-11の予定で行われます。 私のセッションは以下のとおりです。 Perl? Which Perl?: YAPC::Asia 2009 Perl, Unicode, and AJAX: YAPC::Asi... 続きを読む
素晴らしい言語の、素晴らしい入門本。 何が素晴らしいかというと、言語の思想が、頭ではなく体で覚えられるようになっていること。これなら言語オタクでなくとも、いや言語オタクでない方が、無名関数やActorの素晴らしさがよくわかる。 それだけに、結構残念... 続きを読む
真偽値 - Perl入門〜サンプルコードによるPerl入門〜 Perlにおける偽値 0 "0" "" 空文字列 undef () 空リスト Perlにおける真値 上記以外すべて "0.0"は、数値としては0と等しいが、真として扱われる。 これも、厳密ではありません。 以下の条件が存在します。 ... 続きを読む
The requested blog was not found on this server -- unless you requested that of Dan Kogai (小飼 弾). まずは以下をご覧下さい。 〄は一文字です(U+3004)。 フォントまわりをカスタマイズしていないIEでも表示を確認できました。UbuntuのFirefoxでは空白で... 続きを読む
#!/usr/bin/perl use strict; use warnings; use Encode; package Encode::UTF24; use base qw/Encode::Encoding/; __PACKAGE__->Define('UTF-24'); sub perlio_ok { 0 } sub decode { my ( $self, $bytes ) = @_; my $utf8 = ''; for ( my $i = 0 ; $i < lengt... 続きを読む
BEGIN{}でくくられていることに注目して下さい。これがないとうまく行きません。 Perlでは、ほとんどの外部モジュールは、requireではなくuseされます。use Foo;は BEGIN{ require Foo; Foo->import(); } と等価ですから、そこで*CORE::GLOBAL::atan2を定義して... 続きを読む
The requested blog was not found on this server -- unless you requested that of Dan Kogai (小飼 弾). 続きを読む
素晴らしい。 2009-07-04 - 当面C#と.NETな記録問題の説明はここまでにして、コードの紹介です。Hacker's delight のコードより4〜5倍速く、そして、イミフ加減が半端じゃない!これ一つで 64bit 値以下のすべての値に対応できます。 でも、実際にどれくらい威... 続きを読む
The requested blog was not found on this server -- unless you requested that of Dan Kogai (小飼 弾). speed for creating new one creating new worker とした上で、"good/bad"でなくて"fast/slow"とした方がわかりやすい。 memory memory usage ないし m... 続きを読む
それって<*glob*>「メタ演算子」で。 Perl5 でネコ演算子Range Check - id:kazuhookuのメモ置き場 Perl 5 で、ある値が範囲内に入ってるか確認したいことってあるわけで。たとえば、 my $t = time; if ($min <= $t && $t < $max) { ... } みたいな冗長なコード... 続きを読む