X7ROOT File Manager
Current Path:
/usr/local/share/perl5/Date/Language
usr
/
local
/
share
/
perl5
/
Date
/
Language
/
ðŸ“
..
📄
Afar.pm
(1.01 KB)
📄
Amharic.pm
(1.88 KB)
📄
Austrian.pm
(994 B)
📄
Brazilian.pm
(966 B)
📄
Bulgarian.pm
(2.51 KB)
📄
Chinese.pm
(977 B)
📄
Chinese_GB.pm
(918 B)
📄
Czech.pm
(1.38 KB)
📄
Danish.pm
(1.01 KB)
📄
Dutch.pm
(1.06 KB)
📄
English.pm
(973 B)
📄
Finnish.pm
(1.21 KB)
📄
French.pm
(1020 B)
📄
Gedeo.pm
(1.04 KB)
📄
German.pm
(1.02 KB)
📄
Greek.pm
(2.76 KB)
📄
Hungarian.pm
(2.08 KB)
📄
Icelandic.pm
(1.01 KB)
📄
Italian.pm
(1006 B)
📄
Norwegian.pm
(1004 B)
📄
Occitan.pm
(964 B)
📄
Oromo.pm
(999 B)
📄
Romanian.pm
(892 B)
📄
Russian.pm
(1.35 KB)
📄
Russian_cp1251.pm
(1.01 KB)
📄
Russian_koi8r.pm
(1.01 KB)
📄
Sidama.pm
(980 B)
📄
Somali.pm
(1.13 KB)
📄
Spanish.pm
(922 B)
📄
Swedish.pm
(1.1 KB)
📄
Tigrinya.pm
(1.4 KB)
📄
TigrinyaEritrean.pm
(1.86 KB)
📄
TigrinyaEthiopian.pm
(1.88 KB)
📄
Turkish.pm
(2.03 KB)
Editing: Romanian.pm
## ## Italian tables ## package Date::Language::Romanian; use Date::Language (); use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION); @ISA = qw(Date::Language); $VERSION = "1.01"; @MoY = qw(ianuarie februarie martie aprilie mai iunie iulie august septembrie octombrie noembrie decembrie); @DoW = qw(duminica luni marti miercuri joi vineri sambata); @DoWs = map { substr($_,0,3) } @DoW; @MoYs = map { substr($_,0,3) } @MoY; @AMPM = qw(AM PM); @Dsuf = ('') x 31; @MoY{@MoY} = (0 .. scalar(@MoY)); @MoY{@MoYs} = (0 .. scalar(@MoYs)); @DoW{@DoW} = (0 .. scalar(@DoW)); @DoW{@DoWs} = (0 .. scalar(@DoWs)); # Formatting routines sub format_a { $DoWs[$_[0]->[6]] } sub format_A { $DoW[$_[0]->[6]] } sub format_b { $MoYs[$_[0]->[4]] } sub format_B { $MoY[$_[0]->[4]] } sub format_h { $MoYs[$_[0]->[4]] } sub format_p { $_[0]->[2] >= 12 ? $AMPM[1] : $AMPM[0] } 1;
Upload File
Create Folder