第一回ももクロハッカソンに参加して Acme::MomoiroClover リリースしました
最近はかなこ推しになりつつある、週末エンジニアの secondlife ですこんにちは。
9/4(日)にももいろ週末エンジニアの方々と都内某所で、第一回ももクロハッカソンを開き参加し、Perl ライブラリの Acme::MomoiroClover を作りました。
- https://github.com/hotchpotch/perl-acme-momoiroclover
- http://search.cpan.org/~tateno/Acme-MomoiroClover/
何故今更 Acme::MomoiroClover を作ったかと云うと、今までに日本のアイドルの Acme シリーズは二つ、Acme::MorningMusume と Acme::AKB48 があります。その Acme が存在するアイドル2ユニットに共通していえることの一つに、どちらも紅白歌合戦に参加したことがあることが言えます。つまるところ、日本の Acme::アイドル が作られたのユニットは100%紅白出場しているため、ももクロちゃんの今の目標である紅白歌合戦出場をほんの少しでもサポートできたらと思い、験担ぎの意味を込めて作りました!!
使い方
至って簡単!
use Acme::MomoiroClover; my $momoclo = Acme::MomoiroClover->new;
とふつうに使おうとすると
MomoiroClover is obsolete. Please use Acme::MomoiroClover::Z
となって使うことができません…。(マシンの時刻が2011年4月10日以前なら利用できます)
というわけで今は Acme::MomoiroClover::Z を使いましょう。
use Acme::MomoiroClover::Z; my $momoclo_z = Acme::MomoiroClover::Z->new;
API は Acme::MorningMusume とほぼ同じ*1ですが、各 member に say メソッドがあり、自分のカラーで発言することができます*2。
use Acme::MomoiroClover::Z; my @members = Acme::MomoiroClover::Z->new->members('active'); my $count = 0; for my $member (@members) { $count = 0 if (++$count >= scalar(@members)); $member->say($members[$count]->nick->[0] . "〜"); }
Acme::アイドル について
Acme::アイドルに新しい1ユニットを追加したわけですが、Acme::MorningMusume の作成者、id:antipop 御大にお言葉をいただきました。
- 「本当に大好きな時期は、メンテナンスコストはどうってことないけど、メンバー変更の精神的ダメージがつらい」
- 「YAMLなどでのクラス自動生成は邪道。一個一個メンバーのクラスファイルがないと愛がない」
とのことで、気を引き締めていきたいと思う所存であります。