PMのためのAcme - Acme::PM::*

makamaka
2010-12-25

(firstly written in Japanese, later in English)

こんにちは、makamakaです。今年はYAPC Asia 2010 Tokyoで地方PMやPerler集まりの活動報告・ディスカッションがあったのが印象的でした。また実際、各地で新しいPMが勃興しました*1

そういうわけでPMに関するAcmeを紹介して締めくくります。今CPANにあるのは以下になります(ACME::PM::VoronezhはAcmeが大文字です)。

Acme::PM::Barcelona
Acme::PM::Berlin::Meetings
Acme::PM::Chicago
Acme::PM::Frankfurt::Meetings
Acme::PM::Paris::Meetings
ACME::PM::Voronezh

基本的にはpodに活動報告やリンク先が書いてあったり、次回の会合の日程を知るためのモジュールです。

Acme::PM::Barcelonaではかなり詳細にライトニングトークの内容が掲載されたPODが付属しています。

Acme::PM::Berlin::Meetingsは詳細なミーティングの歴史が付いています。

Acme::PM::ChicagoはChicago.pmで誰かに何かをやらせるのに毎月もめるので、リストからランダムに名前を選ぶ関数がついていたりします。2004年以降更新されていませんが……

先達を見習って私もAcme::PM::Hachiojiというのをつくってみました。大変てきとーかつ、機能がありませんので我こそはと思う方はどんどん弄ってください。

use strict;
use  Acme::PM::Hachioji;

my $meetings = Acme::PM::Hachioji->meetings;

while ( my $meeting = $meetings->next ) {
    print $meeting->ymd, "\n";
}

Hachioji.pmの次回新年会の日程が取り出せますよ!


もちろん

while ( my $meeting = $meetings->previous ) {
    print $meeting->ymd, "\n";
}

前回の会合の日程もとれます。


てな感じで、このお正月はあなたもお近くのAcme::PMをこさえてみては如何でしょうか。
それでは良いお年を!



* ----------------------------------------------------
* English version
* ----------------------------------------------------
TITLE: Acme for PM - Acme::PM::*.

Hello, I am makamaka. In YAPC Asia 2010 Tokyo, local PMs and Perler's circles report theire activities and had a discussion. Additionaly some local PMs was born *2.

So I introduce Acme modules for PM. Currently on CPAN(ACME::PM::Voronezh's Acme is ACME).

Acme::PM::Barcelona
Acme::PM::Berlin::Meetings
Acme::PM::Chicago
Acme::PM::Frankfurt::Meetings
Acme::PM::Paris::Meetings
ACME::PM::Voronezh

Basically they say activities or links, and inform next meetings.

I also wrote Acme::PM::Hachioji.

use strict;
use  Acme::PM::Hachioji;

my $meetings = Acme::PM::Hachioji->meetings;

while ( my $meeting = $meetings->next ) {
    print $meeting->ymd, "\n";
}

You can get next Hachioji.pm meeting date! But it is not yet decided, so retrn undef.


Of course

while ( my $meeting = $meetings->previous ) {
    print $meeting->ymd, "\n";
}

You can get privious date.


Well, in this winter vacation, would you like to write Acme::PM module of you.
Wish a happy new year!

*1: PMについては石垣さんのモダンPerlの世界へようこそ - Perl Mongers:顔の見える仲間を増やそうで素晴らしい説明がされています