package DateTime::Locale::ps;
use strict;
BEGIN
{
if ( $] >= 5.006 )
{
require utf8; utf8->import;
}
}
use DateTime::Locale::root;
@DateTime::Locale::ps::ISA = qw(DateTime::Locale::root);
my @day_names = (
"دوشنبه",
"سهشنبه",
"چهارشنبه",
"پنجشنبه",
"جمعه",
"شنبه",
"یکشنبه",
);
my @day_abbreviations = (
"د\.",
"س\.",
"چ\.",
"پ\.",
"ج\.",
"ش\.",
"ی\.",
);
my @month_names = (
"جنوري",
"فبروري",
"مارچ",
"اپریل",
"می",
"جون",
"جولای",
"اګست",
"سپتمبر",
"اکتوبر",
"نومبر",
"دسمبر",
);
my @month_abbreviations = (
"جنو",
"فبر",
"مار",
"اپر",
"مـی",
"جون",
"جول",
"اګس",
"سپت",
"اکت",
"نوم",
"دسم",
);
my @am_pms = (
"غ\.م\.",
"غ\.و\.",
);
my @eras = (
"ق\.م\.",
"م\.",
);
my $date_parts_order = "ymd";
sub day_names { \@day_names }
sub day_abbreviations { \@day_abbreviations }
sub month_names { \@month_names }
sub month_abbreviations { \@month_abbreviations }
sub am_pms { \@am_pms }
sub eras { \@eras }
sub full_date_format { "\%A\ د\ \%\{ce_year\}\ د\ \%B\ \%\{day\}" }
sub long_date_format { "د\ \%\{ce_year\}\ د\ \%B\ \%\{day\}" }
sub medium_date_format { "\%\{day\}\ \%B\ \%\{ce_year\}" }
sub short_date_format { "\%\{ce_year\}\/\%\{month\}\/\%\{day\}" }
sub full_time_format { "\%\{hour\}\:\%M\:\%S\ \(\%\{time_zone_long_name\}\)" }
sub long_time_format { "\%\{hour\}\:\%M\:\%S\ \(\%\{time_zone_long_name\}\)" }
sub medium_time_format { "\%\{hour\}\:\%M\:\%S" }
sub short_time_format { "\%\{hour\}\:\%M" }
sub date_parts_order { $date_parts_order }
1;