NAME

Metai::Kalendorius - Lithuanian calendar.

SYNOPSIS

         use Metai::Kalendorius;
         use POSIX qw(strftime);
         
         my $data = strftime "%Y.%m.%d", localtime;
         
         print Metai::Kalendorius->vardai($data,'utf-8');
         print Metai::Kalendorius->zodiakas($data,'www');
         print Metai::Kalendorius->metu_laikas($data,'utf-8');
         print Metai::Kalendorius->menuo($data,'www');

DESCRIPTION

This module provides subroutines that return Lithuanian day-names/zodiac name/time of year name/month 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'); =head2 zodiakas Lithuanian zodiac name: Metai::Kalendorius->zodiakas('2006.12.22'); =head2 metu_laikas Lithuanian time of year name: Metai::Kalendorius->metu_laikas('2006.12.22'); =head2 menuo Lithuanian month name: Metai::Kalendorius->menuo('2006.12.22');

AUTHOR

Algirdas R. <algirdas@perl.lt>