Firenze.pm

Ho mandato in mailing list la proposta di social meeting periodico, da farsi il secondo mercoledì del mese. Ok, ma come si fa a sapere in qualche giorno cade? Date::Manip:

use strict;
use warnings;
 
use Date::Manip;
 
print "Firenze.pm Meeting:\n";
my @dates = ParseRecur( 
  "2nd wednesday of every month in 2006" 
);
foreach my $d (@dates) {
        print UnixDate($d, "\t%b %e, %Y\n");
}