tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
Moose - Perl5のためのまったく現代的なオブジェクトシステム
NAME SYNOPSIS CAVEAT DESCRIPTION 別のオブジェクトシステム!?!? これを製品に使えますか？それとも実験段階でしかありませんか？ MooseはPerl 5におけるPerl 6に過ぎませんか？ BUILDING CLASSES WITH MOOSE EXPORTED FUNCTIONS UNEXPORTING FUNCTIONS unimport MISC. What does Moose stand for?? CAVEATS ACKNOWLEDGEMENTS SEE ALSO BUGS AUTHOR COPYRIGHT AND LICENSE DOCUMENT TRANSLATION Page Top NAME Moose - Perl5のためのまったく現代的なオブジェクトシステム Page Top SYNOPSIS package Point; use
Mouse 0.31 - Islands in the byte stream (legacy)
Mouseのco-maintainerになりました。 しばらくは主に互換性を上げるメンテナンスをし，その後Moose::XSのプロトタイプとしてのMouse::XSの実装に入ります。 0.31までにやったこと(Moose 0.90 compatible)： has()においてis => 'bare'をサポートするとともに，アクセサの省略に対して警告するようになりました has()において，accessor/reader/writerが認識されるようになりました with $role => { -excludes => [...] }が動くようになりました Mouse::Utilでfind_meta()とdoes_role()をインポートできるようになりました 他，細かな挙動がMoose互換になっています
perl - DESTROYって何? : 404 Blog Not Found
2006年05月07日11:30 カテゴリLightweight Languages perl - DESTROYって何? Shiroさん、いい質問です。 404 Blog Not Found:perl - Yet Another Way to Add Singleton Methods ちょっと疑問。この実装で、$fooが不要になった時に$fooおよびシングルトンメソッドのsubの実体はGCされるのでしょうか。結論を先に言うと、きちんとされます。というのか、この場合それを手でやっているわけです。そして、それを手でやっている箇所がDESTROY。 sub DESTROY { my $self = shift; $DEBUG and carp "Destroing $self"; delete $Method{ $self + 0 }; } 実はこのmethodは、名前に反して「ゴミ捨て」そ
perl - Yet Another Way to Add Singleton Methods : 404 Blog Not Found
2006年05月06日22:30 カテゴリLightweight Languages perl - Yet Another Way to Add Singleton Methods もちろん! Advanced Perl Programming, 2nd Ed. Simon Cozens [邦訳:実用Perlプログラミング第2版] naoyaグループ - naoyaの日記 - Perl で Singleton Methodということで Class::SingletonMethod みたいにクラス名を汚染しちゃうような方法以外で Singleton Method (特異メソッド) を実現する方法はないかなあ。賢明で懸命なヒョウ本(持ってない人は上から買ってちょんまげ)の読者は、これを思いつくと思うのだけど。 package Object::SingletonMethod; use 5.008
Perl Tips - Unknown::Programming
PerlのTipsになりそうなものを過去ログから引っ張り出してみました。 ランダムな文字列を生成するString::Random - Unknown::Programming local our $hoge; - Unknown::Programming whileでファイルハンドルをループする時の暗黙の$_について - Unknown::Programming リストの要素数を取得する - Unknown::Programming Perl6::Say-0.10 - Unknown::Programming クラスメソッドのインポートをModule::Compileでやっちゃう。 - Unknown::Programming メソッド呼び出しで継承する - Unknown::Programming どう書くでリハビリ - Unknown::Programming メソッド名一覧どーかく？
エイリアスメソッドの作成方法の続き - Unknown::Programming
エイリアスメソッドの作成方法 - Unknown::Programming 前に上記記事でメソッドのエイリアスを作る方法を書いたんだけども。 Class::C3使ってるときにうまくいかないという結論のまま終わってました。 一応その後、id:charsbarさんがエイリアスメソッドの作成方法 - Charsbar::Noteという記事でAUTOLOADを使って実現する方法を書いてくれたんだけど、AUTOLOADだと全体に影響を及ぼしそうなので他に影響を与えずにエイリアスメソッドを作りたいなぁと。 そこで、最近Perl Hacks読んで思いついたので若干無茶な方法だけどエイリアスメソッドを作るモジュールを考えてみました。 名づけてSub::Alias。 package Sub::Alias; use strict; use warnings; use B::Deparse; use base
エイリアスメソッドの作成方法 - Charsbar::Note
最初に書いたものはいささかトンチキなことをしていたので再度書き直し。fbisさんがエイリアスメソッドの作成方法で書かれていた あと、問題点としてはgoto使うにしても型グロブ使うにしてもClass::C3とかでhogeメソッド内でnext::methodを使ってる場合は hoge_aliasメソッドではなくhogeメソッドに行ってしまうところかな。 package Hoge; use strict; sub hoge_alias { print "Hoge::hoge_alias\n" } sub hoge { print "Hoge::hoge\n" } package Muge; use strict; use base qw/Hoge/; use Class::C3; sub hoge { my $self = shift; $self->next::method; } sub ho
エイリアスメソッドの作成方法 - Unknown::Programming
ここにhogeというメソッドがあるとして sub hoge { my $self = shift; my $num = shift; return $num + 10; } こいつと同じ動きをするhoge_aliasメソッドを作成する場合、 例えば下記のようにhogeメソッドにそのまま投げるやり方がすぐ思いつく方法かな。 sub hoge_alias { shift->hoge(@_) } これでもいいんですが、hogeメソッドでcaller関数なんかを使って何かしら処理している場合に問題になる可能性があるので、gotoとか使ってみる。 sub hoge_alias { goto &hoge } だけど、型グロブ期な僕は下記のようにするのが好きです。 *hoge_alias = \&hoge; ただし、use warningsとかしてると「Name "main::hoge_alias" u
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
