叶文彬 > Calendar-Any > Calendar::Any::Julian

Download:
Calendar-Any-0.5.tar.gz

Dependencies

Annotate this POD

CPAN RT

New  2
Open  0
View/Report Bugs
Module Version: 0.5   Source  

NAME ^

Calendar::Any::Julian - Perl extension for Julian Calendar

VERSION ^

version 0.5

SYNOPSIS ^

   use Calendar::Any::Julian;
   my $date = Calendar::Any::Julian->new(1, 1, 2006);

DESCRIPTION ^

From "FREQUENTLY ASKED QUESTIONS ABOUT CALENDARS"(http://www.tondering.dk/claus/calendar.html)

The Julian calendar was introduced by Julius Caesar in 45 BC. It was in common use until the late 1500s, when countries started changing to the Gregorian calendar (section 2.2). However, some countries (for example, Greece and Russia) used it into the early 1900s, and the Orthodox church in Russia still uses it, as do some other Orthodox churches.

In the Julian calendar, the tropical year is approximated as 365 1/4 days = 365.25 days. This gives an error of 1 day in approximately 128 years.

The approximation 365 1/4 is achieved by having 1 leap year every 4 years.

METHOD ^

is_leap_year

True if the date in a leap year.

day_of_year

Return the day of year the day of the year, in the range 1..365 (or 1..366 in leap years.)

last_day_of_month

Return the last day in the month. For example:

    $date = Calendar::Any::Julian->new(2, 1, 2006);
    print $date->last_day_of_month;       # output 28

AUTHOR ^

Ye Wenbin <wenbinye@gmail.com>

SEE ALSO ^

Calendar::Any, Calendar::Any::Gregorian

syntax highlighting: