Date::Decade - Decade calculations

NAME

  use Date::Decade qw(
        Days_in_Decade
        Decade_of_Year
        Decade_of_Month
  );

  use Date::Decade qw(:all);

 Days_in_Decade
   $days_in_decade = Days_in_Decade($year,$decade);

 Decade_of_Year
   $decade_of_year = Decade_of_Year($year,$month,$day);

 Decade_of_Month
   $decade_of_month = Decade_of_Month($year,$month,$day);

  $days_in_decade = Days_in_Decade($year,$decade);
    This function returns how many days a given decade
    have.

  $decade_of_year = Decade_of_Year($year,$month,$day);
    This function returns which decade it is on a
    given date (from the 1. January).

  $decade_of_month = Decade_of_Month($year,$month,$day);
    This function returns which decade it is on a
    given month.

This module requires perl 5.003_03 or later and:

or (with some changes)

No Bugs known for now. ;)