Date::Holidays:: PT
Date::Holidays::PT - Determine Portuguese public holidays
SYNOPSIS
use Date::Holidays::PT;
my ($year, $month, $day) = (localtime)[ 5, 4, 3 ];
$year += 1900;
$month += 1;
print "Woohoo" if is_pt_holiday( $year, $month, $day );
my $h = pt_holidays($year);
printf "Jan. 1st is ... |
April 21st 2011 |
Freeware |
|
10k |