Metai::Kalendorius - Lithuanian calendar.
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'); print Metai::Kalendorius->diena($data,'www');
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).
Lithuanian day-names: Metai::Kalendorius->vardai('2006.12.22');
Lithuanian zodiac name: Metai::Kalendorius->zodiakas('2006.12.22');
Lithuanian time of year name: Metai::Kalendorius->metu_laikas('2006.12.22');
Lithuanian month name: Metai::Kalendorius->menuo('2006.12.22');
Lithuanian day name: Metai::Kalendorius->diena('2006.12.22');
Algirdas R. <algirdas@perl.lt>
To install Metai::Kalendorius, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Metai::Kalendorius
CPAN shell
perl -MCPAN -e shell install Metai::Kalendorius
For more information on module installation, please visit the detailed CPAN module installation guide.