CPANに上がってるのだとどーやったらいいのかさっぱりわかんなかったけど、code.sixapart.comに上がってるやつだとこんな感じでやるみたい。 Data::ObjectDriver::BaseObject->begin_work; eval { my $album = Album->new; $album->title('Album'); $album->…
おら、まともなエンジニアとして余生を過ごしたいだ。
最近Perl-users.jpの勢いが落ちてるよね。 別に急かすつもりはないんだけど、id:tokuhiromがすごい頑張ってるからみんなも手が空いたら色々書いてみるといいよ。 と言いつつ僕も最近書いていなかったので、TTになってるのさえ忘れてたよ。 反省反省。
http://coderepos.org/share/browser/lang/perl/Net-Pathtraq/trunk ものすごいやっつけで書いたけど、Pathtraqの面白さが手軽に楽しめるよ。http://pathtraq.com/developer この辺を読みながら使ってみるといいよ。
買ったんだけど、よくよく考えたら野球かサッカー観戦くらいしか写真撮らないんだった。
XenとOpenVZの違いがわかんなかったので飲み会の席で教えてもらった。 要はXenはハードウェアの仮想化でOpenVZはOSの仮想化っちゅーことですね。 理解しました。
tagging オブジェクトに対するラベル(タグ)をあらわすモデル 大文字小文字などの正規化やタグを介した関連性などを求められる必要がある follower-following ユーザーとユーザーの関係をあらわすモデル timeline 関係あるユーザーの行動をあらわすモデル
Catalystのstashをグローバル変数的に使うのは - Charsbar::Note ビューのテンプレート設定とかもそう。古くさいC::V::TTではstash経由でテンプレを渡しているけど、新しいC::V::Templated ベースのものはstashなんぞ通さず、$c->view(...)->template('templ…
http://u32.net/Git/空の.gitignoreファイルを置いておく必要がある。
typesterさんから sub method :ActionClass('Foo') :ActionClass('Bar') {} 的なことできないかっつー話があって、当然できると思ったので即答で「できる」と嘘をついちゃった。Catalyst::Controllerのregister_actionsからcreate_actionを呼んでて sub crea…
昔のCatalystのプラグインのロードは全て use Catalyst qw/-Debug ConfigLoader Static::Simple/; ってなってたんだけど、最近ディストリビューションでは __PACKAGE__->setup( qw/-Debug ConfigLoader Static::Simple/ ); ってなってる。 コミュニティに学…
[Catalyst] IMPORTANT: To all Catalyst::Whatever Authors, please read and ACT YAML is not an appropriate configuration format for use in perldoc because both yaml and perldoc are sensitive to white space. Therefore they interact. Even worse…
13:09 (mst) thx? 13:09 (purl) please don't say "thx", if you're genuinely grateful it's worth the effort to type three extra characters and say "thanks". this is IRC, after all, not SMS or twitter IRCでは感謝の意を込めて略さずthanksってタ…
use Catalyst::View::Email or Catalyst::View::Email::Template DO NOT use Catalyst::Plugin::Email
use Moose Mooseでクラスを作るのは簡単です。 package Dog; use Moose; 1; これで、newというコンストラクタメソッドを持ったDogクラスのインスタンスを生成することができます。 my $dog = Dog->new; print ref $dog; ちゃんと$dogがDogのインスタンスであ…
シンプルなPerl 5でクラスを作る 普通のPerl5 OOでクラスを書くと { package Dog; use strict; use warnings; sub new { my ( $class, %args ) = @_; my $obj = bless { name => $args{name}, gender => $args{gender}, }, $class; return $obj; } sub name …