NAME
Date::Japanese::Holiday - Calculate Japanese Holiday.
SYNOPSIS
# OO interface
use Date::Japanese::Holiday;
# it adds is_holiday also to Date::Simple namespace
my $date = Date::Simple->new(2002, 2, 11);
if ($date->is_holiday) {
# blah, blah
}
# Date::Japanese::Holiday is-a Date::Simple
if (Date::Japanese::Holiday->new(2002, 2, 11)->is_holiday) {
# ...
}
# functional interface
use Date::Japanese::Holiday qw(is_japanese_holiday);
# return Date::Japanese::Holiday object or undef.
if(is_japanese_holiday(2002, 11, 23)) {
# ...
}
DESCRIPTION
This module adds is_holiday
method to Date::Simple, which calcualtes Japanese holiday. This module supports from 1948-04-20 to now.
Date::Japanese::Holiday itself is-a Date::Simple, so you can call this method also on Date::Japanese::Holiday object, if you like.
is_holiday method return true value when the day is Holiday.
AUTHOR
IKEBE Tomohiro <ikebe@edge.co.jp>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.