package DateTime::Locale::el;
use strict;
BEGIN
{
if ( $] >= 5.006 )
{
require utf8; utf8->import;
}
}
use DateTime::Locale::root;
@DateTime::Locale::el::ISA = qw(DateTime::Locale::root);
my @day_names = (
"Δευτέρα",
"Τρίτη",
"Τετάρτη",
"Πέμπτη",
"Παρασκευή",
"Σάββατο",
"Κυριακή",
);
my @day_abbreviations = (
"Δευ",
"Τρι",
"Τετ",
"Πεμ",
"Παρ",
"Σαβ",
"Κυρ",
);
my @day_narrows = (
"Δ",
"Τ",
"Τ",
"Π",
"Π",
"Σ",
"Κ",
);
my @month_names = (
"Ιανουαρίου",
"Φεβρουαρίου",
"Μαρτίου",
"Απριλίου",
"Μαΐου",
"Ιουνίου",
"Ιουλίου",
"Αυγούστου",
"Σεπτεμβρίου",
"Οκτωβρίου",
"Νοεμβρίου",
"Δεκεμβρίου",
);
my @month_abbreviations = (
"Ιαν",
"Φεβ",
"Μαρ",
"Απρ",
"Μαϊ",
"Ιουν",
"Ιουλ",
"Αυγ",
"Σεπ",
"Οκτ",
"Νοε",
"Δεκ",
);
my @month_narrows = (
"Ι",
"Φ",
"Μ",
"Α",
"Μ",
"Ι",
"Ι",
"Α",
"Σ",
"Ο",
"Ν",
"Δ",
);
my @am_pms = (
"ΠΜ",
"ΜΜ",
);
my @eras = (
"π\.Χ\.",
"μ\.Χ\.",
);
my $date_parts_order = "dmy";
sub day_names { \@day_names }
sub day_abbreviations { \@day_abbreviations }
sub day_narrows { \@day_narrows }
sub month_names { \@month_names }
sub month_abbreviations { \@month_abbreviations }
sub month_narrows { \@month_narrows }
sub am_pms { \@am_pms }
sub eras { \@eras }
sub full_date_format { "\%A\,\ \%d\ \%B\ \%\{ce_year\}" }
sub long_date_format { "\%d\ \%B\ \%\{ce_year\}" }
sub medium_date_format { "\%d\ \%b\ \%\{ce_year\}" }
sub short_date_format { "\%d\/\%m\/\%\{ce_year\}" }
sub full_time_format { "\%\{hour_12\}\:\%M\:\%S\ \%p\ \%\{time_zone_long_name\}" }
sub long_time_format { "\%\{hour_12\}\:\%M\:\%S\ \%p\ \%\{time_zone_long_name\}" }
sub medium_time_format { "\%\{hour_12\}\:\%M\:\%S\ \%p" }
sub short_time_format { "\%\{hour_12\}\:\%M\ \%p" }
sub date_parts_order { $date_parts_order }
1;