Date-Japanese-Era
view release on metacpan or search on metacpan
Refactored how to handle encodings. Deprecated old codeset()
APIs and now it just requires Unicode flagged string as method
input/output.
0.03 Mon Dec 10 16:47:30 JST 2001
- forgot to update MANIFEST
0.02 Wed Nov 21 02:30:13 JST 2001
* Added Date::Japanese::Era::Table::JIS_X0301
(Thanks to Junio Hamano <junio@twinsun.com>)
- Raise warnings before 1872 (non-gregorian calendar)
0.01 Fri Aug 31 21:33:16 2001
- original version; created by h2xs 1.19
{
"abstract" : "Conversion between Japanese Era / Gregorian calendar",
"author" : [
"Tatsuhiko Miyagawa <miyagawa@bulknews.net>"
],
"dynamic_config" : 0,
"generated_by" : "Dist::Milla version v1.0.20, Dist::Zilla version 6.024, CPAN::Meta::Converter version 2.150010",
"license" : [
"perl_5"
],
"meta-spec" : {
"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
---
abstract: 'Conversion between Japanese Era / Gregorian calendar'
author:
- 'Tatsuhiko Miyagawa <miyagawa@bulknews.net>'
build_requires:
Test::More: '0'
configure_requires:
ExtUtils::MakeMaker: '0'
dynamic_config: 0
generated_by: 'Dist::Milla version v1.0.20, Dist::Zilla version 6.024, CPAN::Meta::Converter version 2.150010'
license: perl
meta-spec:
Makefile.PL view on Meta::CPAN
# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.024.
use strict;
use warnings;
use 5.008001;
use ExtUtils::MakeMaker;
my %WriteMakefileArgs = (
"ABSTRACT" => "Conversion between Japanese Era / Gregorian calendar",
"AUTHOR" => "Tatsuhiko Miyagawa <miyagawa\@bulknews.net>",
"CONFIGURE_REQUIRES" => {
"ExtUtils::MakeMaker" => 0
},
"DISTNAME" => "Date-Japanese-Era",
"LICENSE" => "perl",
"MIN_PERL_VERSION" => "5.008001",
"NAME" => "Date::Japanese::Era",
"PREREQ_PM" => {
"Date::Calc" => "4.3",
NAME
Date::Japanese::Era - Conversion between Japanese Era / Gregorian
calendar
SYNOPSIS
use utf8;
use Date::Japanese::Era;
# from Gregorian (month + day required)
$era = Date::Japanese::Era->new(1970, 1, 1);
# from Japanese Era
# use JIS X0301 table for conversion
use Date::Japanese::Era 'JIS_X0301';
# more DWIMmy
$era = Date::Japanese::Era->new("æåäºåäºå¹´");
$era = Date::Japanese::Era->new("æå52å¹´");
DESCRIPTION
Date::Japanese::Era handles conversion between Japanese Era and
Gregorian calendar.
METHODS
new
$era = Date::Japanese::Era->new($year, $month, $day);
$era = Date::Japanese::Era->new($era_name, $year);
$era = Date::Japanese::Era->new($era_year_string);
Constructs new Date::Japanese::Era instance. When constructed from
my $era2 = Date::Japanese::Era->new($era1->gregorian_year, $month, $day);
$ok = $era1->name eq $era2->name;
};
return $ok;
}
CAVEATS
* Currently supported era is up to 'meiji'. And before Meiji
05.12.02, gregorius calendar was not used there, but lunar calendar
was. This module does not support lunar calendar, but gives warnings
in such cases ("In %d they didn't use gregorius calendar").
To use calendar ealier than that, see
DateTime::Calendar::Japanese::Era, which is based on DateTime
framework and is more comprehensive.
* There should be discussion how we handle the exact day the era has
changed (former one or latter one?). This module default handles the
day as newer one, but you can change so that it sticks to JIS table
(older one) by saying:
use Date::Japanese::Era 'JIS_X0301';
lib/Date/Japanese/Era.pm view on Meta::CPAN
return $self->{gregorian_year};
}
1;
__END__
=encoding utf-8
=head1 NAME
Date::Japanese::Era - Conversion between Japanese Era / Gregorian calendar
=head1 SYNOPSIS
use utf8;
use Date::Japanese::Era;
# from Gregorian (month + day required)
$era = Date::Japanese::Era->new(1970, 1, 1);
# from Japanese Era
lib/Date/Japanese/Era.pm view on Meta::CPAN
# use JIS X0301 table for conversion
use Date::Japanese::Era 'JIS_X0301';
# more DWIMmy
$era = Date::Japanese::Era->new("æåäºåäºå¹´");
$era = Date::Japanese::Era->new("æå52å¹´");
=head1 DESCRIPTION
Date::Japanese::Era handles conversion between Japanese Era and
Gregorian calendar.
=head1 METHODS
=over 4
=item new
$era = Date::Japanese::Era->new($year, $month, $day);
$era = Date::Japanese::Era->new($era_name, $year);
$era = Date::Japanese::Era->new($era_year_string);
lib/Date/Japanese/Era.pm view on Meta::CPAN
return $ok;
}
=head1 CAVEATS
=over 4
=item *
Currently supported era is up to 'meiji'. And before Meiji 05.12.02,
gregorius calendar was not used there, but lunar calendar was. This
module does not support lunar calendar, but gives warnings in such
cases ("In %d they didn't use gregorius calendar").
To use calendar ealier than that, see
L<DateTime::Calendar::Japanese::Era>, which is based on DateTime
framework and is more comprehensive.
=item *
There should be discussion how we handle the exact day the era has
changed (former one or latter one?). This module default handles the
day as newer one, but you can change so that it sticks to JIS table
(older one) by saying:
( run in 2.097 seconds using v1.01-cache-2.11-cpan-99c4e6809bf )