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 to.xml
12 # The source file version number was 1.19, generated on
13 # 2009/06/15 03:46:25.
15 # Do not edit this file directly.
17 ###########################################################################
19 package DateTime::Locale::to;
25 use base 'DateTime::Locale::root';
27 sub cldr_version { return "1\.7\.1" }
30 my $am_pm_abbreviated = [ "HH", "EA" ];
31 sub am_pm_abbreviated { return $am_pm_abbreviated }
34 my $date_format_full = "EEEE\ d\ MMMM\ y";
35 sub date_format_full { return $date_format_full }
39 my $date_format_long = "d\ MMMM\ y";
40 sub date_format_long { return $date_format_long }
44 my $date_format_medium = "d\ MMM\ y";
45 sub date_format_medium { return $date_format_medium }
49 my $date_format_short = "dd\-MM\-yyyy";
50 sub date_format_short { return $date_format_short }
54 my $day_format_abbreviated = [ "Mōn", "Tus", "Pul", "Tuʻa", "Fal", "Tok", "Sāp" ];
55 sub day_format_abbreviated { return $day_format_abbreviated }
58 sub day_format_narrow { $_[0]->day_stand_alone_narrow() }
61 my $day_format_wide = [ "Mōnite", "Tusite", "Pulelulu", "Tuʻapulelulu", "Falaite", "Tokonaki", "Sāpate" ];
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 = [ "M", "T", "P", "T", "F", "T", "S" ];
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 = [ "KM", "TS" ];
76 sub era_abbreviated { return $era_abbreviated }
79 my $era_narrow = [ "KāMā", "TāSā" ];
80 sub era_narrow { return $era_narrow }
83 my $era_wide = [ "ki\ muʻa", "taʻu\ ʻo\ Sīsū" ];
84 sub era_wide { return $era_wide }
87 my $first_day_of_week = "1";
88 sub first_day_of_week { return $first_day_of_week }
92 my $month_format_abbreviated = [ "Sān", "Fēp", "Maʻa", "ʻEpe", "Mē", "Sun", "Siu", "ʻAok", "Sēp", "ʻOka", "Nōv", "Tis" ];
93 sub month_format_abbreviated { return $month_format_abbreviated }
96 sub month_format_narrow { $_[0]->month_stand_alone_narrow() }
99 my $month_format_wide = [ "Sānuali", "Fēpueli", "Maʻasi", "ʻEpeleli", "Mē", "Sune", "Siulai", "ʻAokosi", "Sēpitema", "ʻOkatopa", "Nōvema", "Tisema" ];
100 sub month_format_wide { return $month_format_wide }
103 sub month_stand_alone_abbreviated { $_[0]->month_format_abbreviated() }
106 my $month_stand_alone_narrow = [ "S", "F", "M", "E", "M", "S", "S", "A", "S", "O", "N", "T" ];
107 sub month_stand_alone_narrow { return $month_stand_alone_narrow }
110 sub month_stand_alone_wide { $_[0]->month_format_wide() }
113 my $quarter_format_abbreviated = [ "K1", "K2", "K3", "K4" ];
114 sub quarter_format_abbreviated { return $quarter_format_abbreviated }
117 sub quarter_format_narrow { $_[0]->quarter_stand_alone_narrow() }
120 my $quarter_format_wide = [ "kuata\ ʻuluaki", "kuata\ ua", "kuata\ tolu", "kuata\ fā" ];
121 sub quarter_format_wide { return $quarter_format_wide }
124 sub quarter_stand_alone_abbreviated { $_[0]->quarter_format_abbreviated() }
127 my $quarter_stand_alone_narrow = [ "1", "2", "3", "4" ];
128 sub quarter_stand_alone_narrow { return $quarter_stand_alone_narrow }
131 my $quarter_stand_alone_wide = [ "kuata\ 1", "kuata\ 2", "kuata\ 3", "kuata\ 4" ];
132 sub quarter_stand_alone_wide { return $quarter_stand_alone_wide }
135 my $time_format_full = "HH\:mm\:ss\ zzzz";
136 sub time_format_full { return $time_format_full }
140 my $time_format_long = "HH\:mm\:ss\ z";
141 sub time_format_long { return $time_format_long }
145 my $time_format_medium = "HH\:mm\:ss";
146 sub time_format_medium { return $time_format_medium }
150 my $time_format_short = "HH\:mm";
151 sub time_format_short { return $time_format_short }
155 my $_format_for_Hm = "H\:mm";
156 sub _format_for_Hm { return $_format_for_Hm }
160 my $_format_for_M = "L";
161 sub _format_for_M { return $_format_for_M }
165 my $_format_for_MEd = "E\ d\-M";
166 sub _format_for_MEd { return $_format_for_MEd }
170 my $_format_for_MMM = "LLL";
171 sub _format_for_MMM { return $_format_for_MMM }
175 my $_format_for_MMMEd = "E\ d\ MMM";
176 sub _format_for_MMMEd { return $_format_for_MMMEd }
180 my $_format_for_MMMMEd = "E\ d\ MMMM";
181 sub _format_for_MMMMEd { return $_format_for_MMMMEd }
185 my $_format_for_MMMMd = "d\ MMMM";
186 sub _format_for_MMMMd { return $_format_for_MMMMd }
190 my $_format_for_MMMd = "d\ MMM";
191 sub _format_for_MMMd { return $_format_for_MMMd }
195 my $_format_for_Md = "d\-M";
196 sub _format_for_Md { return $_format_for_Md }
200 my $_format_for_d = "d";
201 sub _format_for_d { return $_format_for_d }
205 my $_format_for_ms = "mm\:ss";
206 sub _format_for_ms { return $_format_for_ms }
210 my $_format_for_y = "y";
211 sub _format_for_y { return $_format_for_y }
215 my $_format_for_yM = "M\-yyyy";
216 sub _format_for_yM { return $_format_for_yM }
220 my $_format_for_yMEd = "EEE\ d\-M\-yyyy";
221 sub _format_for_yMEd { return $_format_for_yMEd }
225 my $_format_for_yMMM = "MMM\ y";
226 sub _format_for_yMMM { return $_format_for_yMMM }
230 my $_format_for_yMMMEd = "EEE\ d\ MMM\ y";
231 sub _format_for_yMMMEd { return $_format_for_yMMMEd }
235 my $_format_for_yMMMM = "MMMM\ y";
236 sub _format_for_yMMMM { return $_format_for_yMMMM }
240 my $_format_for_yQ = "yyyy\ Q";
241 sub _format_for_yQ { return $_format_for_yQ }
245 my $_format_for_yQQQ = "y\ QQQ";
246 sub _format_for_yQQQ { return $_format_for_yQQQ }
250 my $_format_for_yyMM = "MM\-yy";
251 sub _format_for_yyMM { return $_format_for_yyMM }
255 my $_format_for_yyMMM = "MMM\ yy";
256 sub _format_for_yyMMM { return $_format_for_yyMMM }
260 my $_format_for_yyQ = "Q\ yy";
261 sub _format_for_yyQ { return $_format_for_yyQ }
265 my $_available_formats =
271 "MMMEd" => "E\ d\ MMM",
272 "MMMMEd" => "E\ d\ MMMM",
273 "MMMMd" => "d\ MMMM",
280 "yMEd" => "EEE\ d\-M\-yyyy",
282 "yMMMEd" => "EEE\ d\ MMM\ y",
283 "yMMMM" => "MMMM\ y",
287 "yyMMM" => "MMM\ yy",
290 sub _available_formats { return $_available_formats }
310 my $dt = DateTime->now( locale => 'to' );
311 print $dt->month_name();
315 This is the DateTime locale package for Tonga.
319 This locale inherits from the L<DateTime::Locale::root> locale.
321 It contains the following data.
335 =head3 Abbreviated (format)
345 =head3 Narrow (format)
355 =head3 Wide (stand-alone)
365 =head3 Abbreviated (stand-alone)
375 =head3 Narrow (stand-alone)
402 =head3 Abbreviated (format)
417 =head3 Narrow (format)
432 =head3 Wide (stand-alone)
447 =head3 Abbreviated (stand-alone)
462 =head3 Narrow (stand-alone)
486 =head3 Abbreviated (format)
493 =head3 Narrow (format)
500 =head3 Wide (stand-alone)
507 =head3 Abbreviated (stand-alone)
514 =head3 Narrow (stand-alone)
542 2008-02-05T18:30:30 = Tusite 5 Fēpueli 2008
543 1995-12-22T09:05:02 = Falaite 22 Tisema 1995
544 -0010-09-15T04:44:23 = Tokonaki 15 Sēpitema -10
548 2008-02-05T18:30:30 = 5 Fēpueli 2008
549 1995-12-22T09:05:02 = 22 Tisema 1995
550 -0010-09-15T04:44:23 = 15 Sēpitema -10
554 2008-02-05T18:30:30 = 5 Fēp 2008
555 1995-12-22T09:05:02 = 22 Tis 1995
556 -0010-09-15T04:44:23 = 15 Sēp -10
560 2008-02-05T18:30:30 = 05-02-2008
561 1995-12-22T09:05:02 = 22-12-1995
562 -0010-09-15T04:44:23 = 15-09--010
566 2008-02-05T18:30:30 = 5 Fēp 2008
567 1995-12-22T09:05:02 = 22 Tis 1995
568 -0010-09-15T04:44:23 = 15 Sēp -10
574 2008-02-05T18:30:30 = 18:30:30 UTC
575 1995-12-22T09:05:02 = 09:05:02 UTC
576 -0010-09-15T04:44:23 = 04:44:23 UTC
580 2008-02-05T18:30:30 = 18:30:30 UTC
581 1995-12-22T09:05:02 = 09:05:02 UTC
582 -0010-09-15T04:44:23 = 04:44:23 UTC
586 2008-02-05T18:30:30 = 18:30:30
587 1995-12-22T09:05:02 = 09:05:02
588 -0010-09-15T04:44:23 = 04:44:23
592 2008-02-05T18:30:30 = 18:30
593 1995-12-22T09:05:02 = 09:05
594 -0010-09-15T04:44:23 = 04:44
598 2008-02-05T18:30:30 = 18:30:30
599 1995-12-22T09:05:02 = 09:05:02
600 -0010-09-15T04:44:23 = 04:44:23
602 =head2 Datetime Formats
606 2008-02-05T18:30:30 = Tusite 5 Fēpueli 2008 18:30:30 UTC
607 1995-12-22T09:05:02 = Falaite 22 Tisema 1995 09:05:02 UTC
608 -0010-09-15T04:44:23 = Tokonaki 15 Sēpitema -10 04:44:23 UTC
612 2008-02-05T18:30:30 = 5 Fēpueli 2008 18:30:30 UTC
613 1995-12-22T09:05:02 = 22 Tisema 1995 09:05:02 UTC
614 -0010-09-15T04:44:23 = 15 Sēpitema -10 04:44:23 UTC
618 2008-02-05T18:30:30 = 5 Fēp 2008 18:30:30
619 1995-12-22T09:05:02 = 22 Tis 1995 09:05:02
620 -0010-09-15T04:44:23 = 15 Sēp -10 04:44:23
624 2008-02-05T18:30:30 = 05-02-2008 18:30
625 1995-12-22T09:05:02 = 22-12-1995 09:05
626 -0010-09-15T04:44:23 = 15-09--010 04:44
630 2008-02-05T18:30:30 = 5 Fēp 2008 18:30:30
631 1995-12-22T09:05:02 = 22 Tis 1995 09:05:02
632 -0010-09-15T04:44:23 = 15 Sēp -10 04:44:23
634 =head2 Available Formats
638 2008-02-05T18:30:30 = 5 Tus
639 1995-12-22T09:05:02 = 22 Fal
640 -0010-09-15T04:44:23 = 15 Tok
644 2008-02-05T18:30:30 = 18:30
645 1995-12-22T09:05:02 = 9:05
646 -0010-09-15T04:44:23 = 4:44
650 2008-02-05T18:30:30 = 18:30:30
651 1995-12-22T09:05:02 = 9:05:02
652 -0010-09-15T04:44:23 = 4:44:23
656 2008-02-05T18:30:30 = 2
657 1995-12-22T09:05:02 = 12
658 -0010-09-15T04:44:23 = 9
662 2008-02-05T18:30:30 = Tus 5-2
663 1995-12-22T09:05:02 = Fal 22-12
664 -0010-09-15T04:44:23 = Tok 15-9
668 2008-02-05T18:30:30 = Fēp
669 1995-12-22T09:05:02 = Tis
670 -0010-09-15T04:44:23 = Sēp
672 =head3 MMMEd (E d MMM)
674 2008-02-05T18:30:30 = Tus 5 Fēp
675 1995-12-22T09:05:02 = Fal 22 Tis
676 -0010-09-15T04:44:23 = Tok 15 Sēp
678 =head3 MMMMEd (E d MMMM)
680 2008-02-05T18:30:30 = Tus 5 Fēpueli
681 1995-12-22T09:05:02 = Fal 22 Tisema
682 -0010-09-15T04:44:23 = Tok 15 Sēpitema
684 =head3 MMMMd (d MMMM)
686 2008-02-05T18:30:30 = 5 Fēpueli
687 1995-12-22T09:05:02 = 22 Tisema
688 -0010-09-15T04:44:23 = 15 Sēpitema
692 2008-02-05T18:30:30 = 5 Fēp
693 1995-12-22T09:05:02 = 22 Tis
694 -0010-09-15T04:44:23 = 15 Sēp
698 2008-02-05T18:30:30 = 5-2
699 1995-12-22T09:05:02 = 22-12
700 -0010-09-15T04:44:23 = 15-9
704 2008-02-05T18:30:30 = 5
705 1995-12-22T09:05:02 = 22
706 -0010-09-15T04:44:23 = 15
710 2008-02-05T18:30:30 = 6:30 EA
711 1995-12-22T09:05:02 = 9:05 HH
712 -0010-09-15T04:44:23 = 4:44 HH
714 =head3 hms (h:mm:ss a)
716 2008-02-05T18:30:30 = 6:30:30 EA
717 1995-12-22T09:05:02 = 9:05:02 HH
718 -0010-09-15T04:44:23 = 4:44:23 HH
722 2008-02-05T18:30:30 = 30:30
723 1995-12-22T09:05:02 = 05:02
724 -0010-09-15T04:44:23 = 44:23
728 2008-02-05T18:30:30 = 2008
729 1995-12-22T09:05:02 = 1995
730 -0010-09-15T04:44:23 = -10
734 2008-02-05T18:30:30 = 2-2008
735 1995-12-22T09:05:02 = 12-1995
736 -0010-09-15T04:44:23 = 9--010
738 =head3 yMEd (EEE d-M-yyyy)
740 2008-02-05T18:30:30 = Tus 5-2-2008
741 1995-12-22T09:05:02 = Fal 22-12-1995
742 -0010-09-15T04:44:23 = Tok 15-9--010
746 2008-02-05T18:30:30 = Fēp 2008
747 1995-12-22T09:05:02 = Tis 1995
748 -0010-09-15T04:44:23 = Sēp -10
750 =head3 yMMMEd (EEE d MMM y)
752 2008-02-05T18:30:30 = Tus 5 Fēp 2008
753 1995-12-22T09:05:02 = Fal 22 Tis 1995
754 -0010-09-15T04:44:23 = Tok 15 Sēp -10
756 =head3 yMMMM (MMMM y)
758 2008-02-05T18:30:30 = Fēpueli 2008
759 1995-12-22T09:05:02 = Tisema 1995
760 -0010-09-15T04:44:23 = Sēpitema -10
764 2008-02-05T18:30:30 = 2008 1
765 1995-12-22T09:05:02 = 1995 4
766 -0010-09-15T04:44:23 = -010 3
770 2008-02-05T18:30:30 = 2008 K1
771 1995-12-22T09:05:02 = 1995 K4
772 -0010-09-15T04:44:23 = -10 K3
776 2008-02-05T18:30:30 = 02-08
777 1995-12-22T09:05:02 = 12-95
778 -0010-09-15T04:44:23 = 09-10
780 =head3 yyMMM (MMM yy)
782 2008-02-05T18:30:30 = Fēp 08
783 1995-12-22T09:05:02 = Tis 95
784 -0010-09-15T04:44:23 = Sēp 10
788 2008-02-05T18:30:30 = 1 08
789 1995-12-22T09:05:02 = 4 95
790 -0010-09-15T04:44:23 = 3 10
794 =head3 Prefers 24 hour time?
798 =head3 Local first day of the week
805 See L<DateTime::Locale>.
809 Dave Rolsky <autarch@urth.org>
813 Copyright (c) 2008 David Rolsky. All rights reserved. This program is
814 free software; you can redistribute it and/or modify it under the same
815 terms as Perl itself.
817 This module was generated from data provided by the CLDR project, see
818 the LICENSE.cldr in this distribution for details on the CLDR data's