
Acme::PM::Frankfurt::Meetings - Get the next date(s) of the Frankfurt PM meeting

Version 0.18

use strict;
use warnings;
use Acme::PM::Frankfurt::Meetings qw/next_meeting/;
print "Next Frankfurt.pm meeting: ", next_meeting(1) , "\n";
print "Next 3 Frankfurt.pm meetings:\n";
print join("\n", next_meeting(3) ), "\n";
# $dt is a DateTime Object
my $dt = next_meeting;
my $ymd = $dt->ymd('/');
print "$ymd\n";
my $hms = $dt->hms;
print "$hms\n";

Nothing is imported/exported by default.
Computes the date(s) of the next meetings.
Accepts a count for the number of dates returned (defaults to 1 - next meeting).
Dies on non positive integer counts.
Returns an array of DateTime objects in list context and a single object in scalar context.
use Acme::PM::Frankfurt::Meetings qw/next_meeting/;
# Next meeting
# List Context
print "Next Frankfurt.pm meeting: ", next_meeting, "\n";
# Next three meetings
my @dates = next_meeting(3);
foreach my $date ( @dates ) {
print "Frankfurt.pm meeting: $date\n";
}
# $dt is a DateTime Object
my $dt = next_meeting;
my $ymd = $dt->ymd('/');
print "$ymd\n";
my $hms = $dt->hms;
print "$hms\n";
Internal only - computes the next set


Thomas Fahle, <cpan at thomas-fahle.de>

Please report any bugs or feature requests to bug-acme-pm-frankfurt-meetings at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Acme-PM-Frankfurt-Meetings. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

You can find documentation for this module with the perldoc command.
perldoc Acme::PM::Frankfurt::Meetings
You can also look for information at:
http://rt.cpan.org/NoAuth/Bugs.html?Dist=Acme-PM-Frankfurt-Meetings

Heavily inspired by Acme::PM::Berlin::Meetings http://search.cpan.org/perldoc?Acme::PM::Berlin::Meetings


Copyright 2010, 2011 Thomas Fahle.
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.