OXIESEC PANEL
- Current Dir:
/
/
usr
/
share
/
perl5
/
Date
/
Language
Server IP: 139.59.38.164
Upload:
Create Dir:
Name
Size
Modified
Perms
📁
..
-
02/11/2020 08:10:07 AM
rwxr-xr-x
📄
Afar.pm
1.01 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
Amharic.pm
1.88 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
Austrian.pm
994 bytes
12/12/2009 12:30:06 PM
rw-r--r--
📄
Brazilian.pm
966 bytes
02/23/2009 09:34:32 PM
rw-r--r--
📄
Bulgarian.pm
2.51 KB
12/15/2010 12:14:11 AM
rw-r--r--
📄
Chinese.pm
977 bytes
12/12/2009 12:30:06 PM
rw-r--r--
📄
Chinese_GB.pm
918 bytes
02/23/2009 09:34:32 PM
rw-r--r--
📄
Czech.pm
1.38 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
Danish.pm
1.01 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Dutch.pm
1.06 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
English.pm
973 bytes
02/23/2009 09:34:32 PM
rw-r--r--
📄
Finnish.pm
1.21 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
French.pm
992 bytes
02/23/2009 09:34:32 PM
rw-r--r--
📄
Gedeo.pm
1.04 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
German.pm
1.02 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Greek.pm
2.76 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
Hungarian.pm
2.08 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Icelandic.pm
1.01 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Italian.pm
1006 bytes
12/12/2009 12:30:06 PM
rw-r--r--
📄
Norwegian.pm
1004 bytes
12/12/2009 12:30:06 PM
rw-r--r--
📄
Oromo.pm
999 bytes
02/23/2009 09:34:32 PM
rw-r--r--
📄
Romanian.pm
892 bytes
12/12/2009 12:30:06 PM
rw-r--r--
📄
Russian.pm
1.35 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Russian_cp1251.pm
1.01 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Russian_koi8r.pm
1.01 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Sidama.pm
980 bytes
02/23/2009 09:34:32 PM
rw-r--r--
📄
Somali.pm
1.13 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
Spanish.pm
922 bytes
12/12/2009 12:27:24 PM
rw-r--r--
📄
Swedish.pm
1.1 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
Tigrinya.pm
1.4 KB
12/12/2009 12:30:06 PM
rw-r--r--
📄
TigrinyaEritrean.pm
1.86 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
TigrinyaEthiopian.pm
1.88 KB
02/23/2009 09:34:32 PM
rw-r--r--
📄
Turkish.pm
2.03 KB
12/12/2009 12:30:06 PM
rw-r--r--
Editing: Tigrinya.pm
Close
## ## Tigrinya tables ## package Date::Language::Tigrinya; use Date::Language (); use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION); @ISA = qw(Date::Language); $VERSION = "1.00"; @DoW = ( "\x{1230}\x{1295}\x{1260}\x{1275}", "\x{1230}\x{1291}\x{12ed}", "\x{1230}\x{1209}\x{1235}", "\x{1228}\x{1261}\x{12d5}", "\x{1213}\x{1219}\x{1235}", "\x{12d3}\x{122d}\x{1262}", "\x{1240}\x{12f3}\x{121d}" ); @MoY = ( "\x{1303}\x{1295}\x{12e9}\x{12c8}\x{122a}", "\x{134c}\x{1265}\x{1229}\x{12c8}\x{122a}", "\x{121b}\x{122d}\x{127d}", "\x{12a4}\x{1355}\x{1228}\x{120d}", "\x{121c}\x{12ed}", "\x{1301}\x{1295}", "\x{1301}\x{120b}\x{12ed}", "\x{12a6}\x{1308}\x{1235}\x{1275}", "\x{1234}\x{1355}\x{1274}\x{121d}\x{1260}\x{122d}", "\x{12a6}\x{12ad}\x{1270}\x{12cd}\x{1260}\x{122d}", "\x{1296}\x{126c}\x{121d}\x{1260}\x{122d}", "\x{12f2}\x{1234}\x{121d}\x{1260}\x{122d}" ); @DoWs = map { substr($_,0,3) } @DoW; @MoYs = map { substr($_,0,3) } @MoY; @AMPM = ( "\x{1295}/\x{1230}", "\x{12F5}/\x{1230}" ); @Dsuf = ("\x{12ed}" 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;