1 ###########################################################################
3 # This file is auto-generated by the Perl DateTime Suite locale
4 # generator (0.05). This code generator comes with the
5 # DateTime::Locale distribution in the tools/ directory, and is called
8 # This file as generated from the CLDR XML locale data. See the
9 # LICENSE.cldr file included in this distribution for license details.
11 # This file was generated from the source file cch.xml
12 # The source file version number was 1.31, generated on
13 # 2009/05/05 23:06:34.
15 # Do not edit this file directly.
17 ###########################################################################
19 package DateTime::Locale::cch;
25 use base 'DateTime::Locale::root';
27 sub cldr_version { return "1\.7\.1" }
30 my $am_pm_abbreviated = [ "AM", "PM" ];
31 sub am_pm_abbreviated { return $am_pm_abbreviated }
34 my $date_format_full = "EEEE\,\ y\ MMMM\ dd";
35 sub date_format_full { return $date_format_full }
39 my $date_format_long = "y\ MMMM\ d";
40 sub date_format_long { return $date_format_long }
44 my $date_format_medium = "y\ MMM\ d";
45 sub date_format_medium { return $date_format_medium }
49 my $date_format_short = "yy\/MM\/dd";
50 sub date_format_short { return $date_format_short }
54 my $day_format_abbreviated = [ "Tung", "T\.\ Tung", "Tsan", "Nas", "Nat", "Chir", "Yok" ];
55 sub day_format_abbreviated { return $day_format_abbreviated }
58 sub day_format_narrow { $_[0]->day_stand_alone_narrow() }
61 my $day_format_wide = [ "Wai\ Tunga", "Toki\ Gitung", "Tsam\ Kasuwa", "Wai\ Na\ Nas", "Wai\ Na\ Tiyon", "Wai\ Na\ Chirim", "Wai\ Yoka\ Bawai" ];
62 sub day_format_wide { return $day_format_wide }
65 sub day_stand_alone_abbreviated { $_[0]->day_format_abbreviated() }
68 my $day_stand_alone_narrow = [ "2", "3", "4", "5", "6", "7", "1" ];
69 sub day_stand_alone_narrow { return $day_stand_alone_narrow }
72 sub day_stand_alone_wide { $_[0]->day_format_wide() }
75 my $era_abbreviated = [ "GM", "M" ];
76 sub era_abbreviated { return $era_abbreviated }
79 sub era_narrow { $_[0]->era_abbreviated() }
82 my $era_wide = [ "Gabanin\ Miladi", "Miladi" ];
83 sub era_wide { return $era_wide }
86 my $first_day_of_week = "1";
87 sub first_day_of_week { return $first_day_of_week }
91 my $month_format_abbreviated = [ "Dyon", "Baa", "Atat", "Anas", "Atyo", "Achi", "Atar", "Awur", "Shad", "Shak", "Naba", "Nata" ];
92 sub month_format_abbreviated { return $month_format_abbreviated }
95 sub month_format_narrow { $_[0]->month_stand_alone_narrow() }
98 my $month_format_wide = [ "Pen\ Dyon", "Pen\ Ba\'a", "Pen\ Atat", "Pen\ Anas", "Pen\ Atyon", "Pen\ Achirim", "Pen\ Atariba", "Pen\ Awurr", "Pen\ Shadon", "Pen\ Shakur", "Pen\ Kur\ Naba", "Pen\ Kur\ Natat" ];
99 sub month_format_wide { return $month_format_wide }
102 sub month_stand_alone_abbreviated { $_[0]->month_format_abbreviated() }
105 my $month_stand_alone_narrow = [ "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12" ];
106 sub month_stand_alone_narrow { return $month_stand_alone_narrow }
109 sub month_stand_alone_wide { $_[0]->month_format_wide() }
112 my $quarter_format_abbreviated = [ "Q1", "Q2", "Q3", "Q4" ];
113 sub quarter_format_abbreviated { return $quarter_format_abbreviated }
116 my $quarter_format_wide = [ "Q1", "Q2", "Q3", "Q4" ];
117 sub quarter_format_wide { return $quarter_format_wide }
120 sub quarter_stand_alone_abbreviated { $_[0]->quarter_format_abbreviated() }
123 sub quarter_stand_alone_wide { $_[0]->quarter_format_wide() }
126 my $time_format_full = "HH\:mm\:ss\ zzzz";
127 sub time_format_full { return $time_format_full }
131 my $time_format_long = "HH\:mm\:ss\ z";
132 sub time_format_long { return $time_format_long }
136 my $time_format_medium = "HH\:mm\:ss";
137 sub time_format_medium { return $time_format_medium }
141 my $time_format_short = "HH\:mm";
142 sub time_format_short { return $time_format_short }
146 my $_format_for_yyQ = "Q\ yy";
147 sub _format_for_yyQ { return $_format_for_yyQ }
151 my $_available_formats =
155 sub _available_formats { return $_available_formats }
169 DateTime::Locale::cch
175 my $dt = DateTime->now( locale => 'cch' );
176 print $dt->month_name();
180 This is the DateTime locale package for Atsam.
184 This locale inherits from the L<DateTime::Locale::root> locale.
186 It contains the following data.
200 =head3 Abbreviated (format)
210 =head3 Narrow (format)
220 =head3 Wide (stand-alone)
230 =head3 Abbreviated (stand-alone)
240 =head3 Narrow (stand-alone)
267 =head3 Abbreviated (format)
282 =head3 Narrow (format)
297 =head3 Wide (stand-alone)
312 =head3 Abbreviated (stand-alone)
327 =head3 Narrow (stand-alone)
351 =head3 Abbreviated (format)
358 =head3 Narrow (format)
365 =head3 Wide (stand-alone)
372 =head3 Abbreviated (stand-alone)
379 =head3 Narrow (stand-alone)
407 2008-02-05T18:30:30 = Toki Gitung, 2008 Pen Ba'a 05
408 1995-12-22T09:05:02 = Wai Na Tiyon, 1995 Pen Kur Natat 22
409 -0010-09-15T04:44:23 = Wai Na Chirim, -10 Pen Shadon 15
413 2008-02-05T18:30:30 = 2008 Pen Ba'a 5
414 1995-12-22T09:05:02 = 1995 Pen Kur Natat 22
415 -0010-09-15T04:44:23 = -10 Pen Shadon 15
419 2008-02-05T18:30:30 = 2008 Baa 5
420 1995-12-22T09:05:02 = 1995 Nata 22
421 -0010-09-15T04:44:23 = -10 Shad 15
425 2008-02-05T18:30:30 = 08/02/05
426 1995-12-22T09:05:02 = 95/12/22
427 -0010-09-15T04:44:23 = 10/09/15
431 2008-02-05T18:30:30 = 2008 Baa 5
432 1995-12-22T09:05:02 = 1995 Nata 22
433 -0010-09-15T04:44:23 = -10 Shad 15
439 2008-02-05T18:30:30 = 18:30:30 UTC
440 1995-12-22T09:05:02 = 09:05:02 UTC
441 -0010-09-15T04:44:23 = 04:44:23 UTC
445 2008-02-05T18:30:30 = 18:30:30 UTC
446 1995-12-22T09:05:02 = 09:05:02 UTC
447 -0010-09-15T04:44:23 = 04:44:23 UTC
451 2008-02-05T18:30:30 = 18:30:30
452 1995-12-22T09:05:02 = 09:05:02
453 -0010-09-15T04:44:23 = 04:44:23
457 2008-02-05T18:30:30 = 18:30
458 1995-12-22T09:05:02 = 09:05
459 -0010-09-15T04:44:23 = 04:44
463 2008-02-05T18:30:30 = 18:30:30
464 1995-12-22T09:05:02 = 09:05:02
465 -0010-09-15T04:44:23 = 04:44:23
467 =head2 Datetime Formats
471 2008-02-05T18:30:30 = Toki Gitung, 2008 Pen Ba'a 05 18:30:30 UTC
472 1995-12-22T09:05:02 = Wai Na Tiyon, 1995 Pen Kur Natat 22 09:05:02 UTC
473 -0010-09-15T04:44:23 = Wai Na Chirim, -10 Pen Shadon 15 04:44:23 UTC
477 2008-02-05T18:30:30 = 2008 Pen Ba'a 5 18:30:30 UTC
478 1995-12-22T09:05:02 = 1995 Pen Kur Natat 22 09:05:02 UTC
479 -0010-09-15T04:44:23 = -10 Pen Shadon 15 04:44:23 UTC
483 2008-02-05T18:30:30 = 2008 Baa 5 18:30:30
484 1995-12-22T09:05:02 = 1995 Nata 22 09:05:02
485 -0010-09-15T04:44:23 = -10 Shad 15 04:44:23
489 2008-02-05T18:30:30 = 08/02/05 18:30
490 1995-12-22T09:05:02 = 95/12/22 09:05
491 -0010-09-15T04:44:23 = 10/09/15 04:44
495 2008-02-05T18:30:30 = 2008 Baa 5 18:30:30
496 1995-12-22T09:05:02 = 1995 Nata 22 09:05:02
497 -0010-09-15T04:44:23 = -10 Shad 15 04:44:23
499 =head2 Available Formats
503 2008-02-05T18:30:30 = 5 T. Tung
504 1995-12-22T09:05:02 = 22 Nat
505 -0010-09-15T04:44:23 = 15 Chir
509 2008-02-05T18:30:30 = 18:30
510 1995-12-22T09:05:02 = 9:05
511 -0010-09-15T04:44:23 = 4:44
515 2008-02-05T18:30:30 = 18:30:30
516 1995-12-22T09:05:02 = 9:05:02
517 -0010-09-15T04:44:23 = 4:44:23
521 2008-02-05T18:30:30 = 2
522 1995-12-22T09:05:02 = 12
523 -0010-09-15T04:44:23 = 9
527 2008-02-05T18:30:30 = T. Tung, 2-5
528 1995-12-22T09:05:02 = Nat, 12-22
529 -0010-09-15T04:44:23 = Chir, 9-15
533 2008-02-05T18:30:30 = Baa
534 1995-12-22T09:05:02 = Nata
535 -0010-09-15T04:44:23 = Shad
537 =head3 MMMEd (E MMM d)
539 2008-02-05T18:30:30 = T. Tung Baa 5
540 1995-12-22T09:05:02 = Nat Nata 22
541 -0010-09-15T04:44:23 = Chir Shad 15
543 =head3 MMMMEd (E MMMM d)
545 2008-02-05T18:30:30 = T. Tung Pen Ba'a 5
546 1995-12-22T09:05:02 = Nat Pen Kur Natat 22
547 -0010-09-15T04:44:23 = Chir Pen Shadon 15
549 =head3 MMMMd (MMMM d)
551 2008-02-05T18:30:30 = Pen Ba'a 5
552 1995-12-22T09:05:02 = Pen Kur Natat 22
553 -0010-09-15T04:44:23 = Pen Shadon 15
557 2008-02-05T18:30:30 = Baa 5
558 1995-12-22T09:05:02 = Nata 22
559 -0010-09-15T04:44:23 = Shad 15
563 2008-02-05T18:30:30 = 2-5
564 1995-12-22T09:05:02 = 12-22
565 -0010-09-15T04:44:23 = 9-15
569 2008-02-05T18:30:30 = 5
570 1995-12-22T09:05:02 = 22
571 -0010-09-15T04:44:23 = 15
575 2008-02-05T18:30:30 = 6:30 PM
576 1995-12-22T09:05:02 = 9:05 AM
577 -0010-09-15T04:44:23 = 4:44 AM
579 =head3 hms (h:mm:ss a)
581 2008-02-05T18:30:30 = 6:30:30 PM
582 1995-12-22T09:05:02 = 9:05:02 AM
583 -0010-09-15T04:44:23 = 4:44:23 AM
587 2008-02-05T18:30:30 = 30:30
588 1995-12-22T09:05:02 = 05:02
589 -0010-09-15T04:44:23 = 44:23
593 2008-02-05T18:30:30 = 2008
594 1995-12-22T09:05:02 = 1995
595 -0010-09-15T04:44:23 = -10
599 2008-02-05T18:30:30 = 2008-2
600 1995-12-22T09:05:02 = 1995-12
601 -0010-09-15T04:44:23 = -10-9
603 =head3 yMEd (EEE, y-M-d)
605 2008-02-05T18:30:30 = T. Tung, 2008-2-5
606 1995-12-22T09:05:02 = Nat, 1995-12-22
607 -0010-09-15T04:44:23 = Chir, -10-9-15
611 2008-02-05T18:30:30 = 2008 Baa
612 1995-12-22T09:05:02 = 1995 Nata
613 -0010-09-15T04:44:23 = -10 Shad
615 =head3 yMMMEd (EEE, y MMM d)
617 2008-02-05T18:30:30 = T. Tung, 2008 Baa 5
618 1995-12-22T09:05:02 = Nat, 1995 Nata 22
619 -0010-09-15T04:44:23 = Chir, -10 Shad 15
621 =head3 yMMMM (y MMMM)
623 2008-02-05T18:30:30 = 2008 Pen Ba'a
624 1995-12-22T09:05:02 = 1995 Pen Kur Natat
625 -0010-09-15T04:44:23 = -10 Pen Shadon
629 2008-02-05T18:30:30 = 2008 1
630 1995-12-22T09:05:02 = 1995 4
631 -0010-09-15T04:44:23 = -10 3
635 2008-02-05T18:30:30 = 2008 Q1
636 1995-12-22T09:05:02 = 1995 Q4
637 -0010-09-15T04:44:23 = -10 Q3
641 2008-02-05T18:30:30 = 1 08
642 1995-12-22T09:05:02 = 4 95
643 -0010-09-15T04:44:23 = 3 10
647 =head3 Prefers 24 hour time?
651 =head3 Local first day of the week
658 See L<DateTime::Locale>.
662 Dave Rolsky <autarch@urth.org>
666 Copyright (c) 2008 David Rolsky. All rights reserved. This program is
667 free software; you can redistribute it and/or modify it under the same
668 terms as Perl itself.
670 This module was generated from data provided by the CLDR project, see
671 the LICENSE.cldr in this distribution for details on the CLDR data's