NAME

Metai::Kalendorius - Lithuanian calendar.

SYNOPSIS

        use Metai::Kalendorius;
        use POSIX qw(strftime);

        my $data = strftime "%Y.%m.%d", localtime;

        # Lithuanian day-names
        print Metai::Kalendorius->vardai($data,'utf-8');
        # Lithuanian zodiac name
        print Metai::Kalendorius->zodiakas($data,'www');
        # Lithuanian time of year name
        print Metai::Kalendorius->metu_laikas($data,'utf-8');
        # Lithuanian month name
        print Metai::Kalendorius->menuo($data,'www');
        # Lithuanian day name
        print Metai::Kalendorius->diena($data,'www');

DESCRIPTION

This module provides subroutines that return Lithuanian day-names/zodiac name/time of year name/month name/day name, based on date. Each of those can be returned in utf-8 (default) encoding and "www" type (f.e. Vaišvilas).

vardai

Lithuanian day-names: Metai::Kalendorius->vardai('2006.12.22');

zodiakas

Lithuanian zodiac name: Metai::Kalendorius->zodiakas('2006.12.22');

metu_laikas

Lithuanian time of year name: Metai::Kalendorius->metu_laikas('2006.12.22');

menuo

Lithuanian month name: Metai::Kalendorius->menuo('2006.12.22');

diena

Lithuanian day name: Metai::Kalendorius->diena('2006.12.22');

AUTHOR

Algirdas R. <algirdas@perl.lt>