package DateTime::Locale::zh_Hans_CN;
use strict;
BEGIN
{
if ( $] >= 5.006 )
{
require utf8; utf8->import;
}
}
use DateTime::Locale::zh_Hans;
@DateTime::Locale::zh_Hans_CN::ISA = qw(DateTime::Locale::zh_Hans);
my $date_parts_order = "ymd";
sub full_date_format { "\%\{ce_year\}年\%\{month\}月\%\{day\}日\%A" }
sub long_date_format { "\%\{ce_year\}年\%\{month\}月\%\{day\}日" }
sub medium_date_format { "\%\{ce_year\}\-\%\{month\}\-\%\{day\}" }
sub short_date_format { "\%y\-\%\{month\}\-\%\{day\}" }
sub full_time_format { "\%p\%l时\%M分\%S秒\ \%\{time_zone_long_name\}" }
sub long_time_format { "\%p\%l时\%M分\%S秒" }
sub medium_time_format { "\%p\%l\:\%M\:\%S" }
sub short_time_format { "\%p\%\{hour_12\}\:\%M" }
sub date_parts_order { $date_parts_order }
1;