Date::Japanese::Holiday - Calculate Japanese Holiday.

NAME

  # 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)) {
      # ...
  }

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.

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.