javonet-ruby-sdk 2.1.1 → 2.1.2

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Chinese.pm

@@ -1,36 +0,0 @@
-##
-## English tables
-##
-
-package Date::Language::Chinese;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "1.00";
-
-@DoW = qw(星期日 星期一 星期二 星期三 星期四 星期五 星期六);
-@MoY = qw(一月 二月 三月 四月 五月 六月
-	  七月 八月 九月 十月 十一月 十二月);
-@DoWs = map { $_ } @DoW;
-@MoYs = map { $_ } @MoY;
-@AMPM = qw(上午 下午);
-
-@Dsuf = (qw(日 日 日 日 日 日 日 日 日 日)) x 3;
-
-@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] }
-
-sub format_o { sprintf("%2d%s",$_[0]->[3],"日") }
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Chinese_GB.pm

@@ -1,36 +0,0 @@
-##
-## English tables
-##
-
-package Date::Language::Chinese_GB;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "1.01";
-
-@DoW = qw(������ ����һ ���ڶ� ������ ������ ������ ������);
-@MoY = qw(һ�� ���� ���� ���� ���� ����
-	  ���� ���� ���� ʮ�� ʮһ�� ʮ����);
-@DoWs = map { $_ } @DoW;
-@MoYs = map { $_ } @MoY;
-@AMPM = qw(���� ����);
-
-@Dsuf = (qw(�� �� �� �� �� �� �� �� �� ��)) x 3;
-
-@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] }
-
-sub format_o { sprintf("%2d%s",$_[0]->[3],"��") }
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Czech.pm

@@ -1,58 +0,0 @@
-##
-## Czech tables
-##
-## Contributed by Honza Pazdziora 
-
-package Date::Language::Czech;
-
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @MoY2 @AMPM %MoY %DoW $VERSION);
-@ISA = qw(Date::Language Date::Format::Generic);
-$VERSION = "1.01";
-
-@MoY = qw(leden �nor b�ezen duben kv�ten �erven �ervenec srpen z���
-	      ��jen listopad prosinec);
-@MoYs = qw(led �nor b�e dub kv� �vn �ec srp z��� ��j lis pro);
-@MoY2 = @MoY;
-for (@MoY2)
-      { s!en$!na! or s!ec$!ce! or s!ad$!adu! or s!or$!ora!; }
-
-@DoW = qw(ned�le pond�l� �ter� st�eda �tvrtek p�tek sobota);
-@DoWs = qw(Ne Po �t St �t P� So);
-
-@AMPM = qw(dop. odp.);
-
-@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] }
-
-sub format_d { $_[0]->[3] }
-sub format_m { $_[0]->[4] + 1 }
-sub format_o { $_[0]->[3] . '.' }
-
-sub format_Q { $MoY2[$_[0]->[4]] }
-
-sub time2str {
-      my $ref = shift;
-      my @a = @_;
-      $a[0] =~ s/(%[do]\.?\s?)%B/$1%Q/;
-      $ref->SUPER::time2str(@a);
-      }
-
-sub strftime {
-      my $ref = shift;
-      my @a = @_;
-      $a[0] =~ s/(%[do]\.?\s?)%B/$1%Q/;
-      $ref->SUPER::time2str(@a);
-      }
-
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Danish.pm

@@ -1,36 +0,0 @@
-##
-## Danish tables
-##
-
-package Date::Language::Danish;
-
-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(Januar Februar Marts April Maj Juni
-	   Juli August September Oktober November December);
-@MoYs = qw(Jan Feb Mar Apr Maj Jun Jul Aug Sep Okt Nov Dec);
-@DoW  = qw(S�ndag Mandag Tirsdag Onsdag Torsdag Fredag L�rdag S�ndag);
-@DoWs = qw(S�n Man Tir Ons Tor Fre L�r S�n);
-
-use Date::Language::English ();
-@AMPM =   @{Date::Language::English::AMPM};
-@Dsuf =   @{Date::Language::English::Dsuf};
-
-@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;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Dutch.pm

@@ -1,40 +0,0 @@
-##
-## Dutch tables
-## Contributed by Johannes la Poutre <jlpoutre@corp.nl.home.com>
-##
-
-package Date::Language::Dutch;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "1.02";
-
-@MoY  = qw(januari februari maart april mei juni juli
-           augustus september oktober november december);
-@MoYs = map(substr($_, 0, 3), @MoY);
-$MoYs[2] = 'mrt'; # mrt is more common (Frank Maas)
-@DoW  = map($_ . "dag", qw(zon maan dins woens donder vrij zater));
-@DoWs = map(substr($_, 0, 2), @DoW);
-
-# these aren't normally used...
-@AMPM = qw(VM NM);
-@Dsuf = ('e') 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] }
-sub format_o { sprintf("%2de",$_[0]->[3]) }
-
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/English.pm

@@ -1,37 +0,0 @@
-##
-## English tables
-##
-
-package Date::Language::English;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "1.01";
-
-@DoW = qw(Sunday Monday Tuesday Wednesday Thursday Friday Saturday);
-@MoY = qw(January February March April May June
-	  July August September October November December);
-@DoWs = map { substr($_,0,3) } @DoW;
-@MoYs = map { substr($_,0,3) } @MoY;
-@AMPM = qw(AM PM);
-
-@Dsuf = (qw(th st nd rd th th th th th th)) x 3;
-@Dsuf[11,12,13] = qw(th th th);
-@Dsuf[30,31] = qw(th st);
-
-@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;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Finnish.pm

@@ -1,45 +0,0 @@
-##
-## Finnish tables
-## Contributed by Matthew Musgrove <muskrat@mindless.com>
-## Corrected by roke
-##
-
-package Date::Language::Finnish;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "1.01";
-
-# In Finnish, the names of the months and days are only capitalized at the beginning of sentences.
-@MoY  = map($_ . "kuu", qw(tammi helmi maalis huhti touko kes� hein� elo syys loka marras joulu));
-@DoW  = qw(sunnuntai maanantai tiistai keskiviikko torstai perjantai lauantai);
-
-# it is not customary to use abbreviated names of months or days
-# per Graham's suggestion:
-@MoYs = @MoY;
-@DoWs = @DoW;
-
-# the short form of ordinals
-@Dsuf = ('.') x 31;
-
-# doesn't look like this is normally used...
-@AMPM = qw(ap ip);
-
-
-@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] }
-sub format_o { sprintf("%2de",$_[0]->[3]) }
-
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/French.pm

@@ -1,37 +0,0 @@
-##
-## French tables, contributed by Emmanuel Bataille (bem@residents.frmug.org)
-##
-
-package Date::Language::French;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "1.04";
-
-@DoW = qw(dimanche lundi mardi mercredi jeudi vendredi samedi);
-@MoY = qw(janvier f�vrier mars avril mai juin 
-          juillet ao�t septembre octobre novembre d�cembre);
-@DoWs = map { substr($_,0,3) } @DoW;
-@MoYs = map { substr($_,0,3) } @MoY;
-$MoYs[6] = 'jul';
-@AMPM = qw(AM PM);
-
-@Dsuf = ((qw(er e e e e e e e e e)) x 3, 'er');
-
-@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] }
-sub format_o { $_[0]->[3] }
-
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Gedeo.pm

@@ -1,51 +0,0 @@
-##
-## Gedeo tables
-##
-
-package Date::Language::Gedeo;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "0.99";
-
-@DoW = qw( Sanbbattaa Sanno Masano Roobe Hamusse Arbe Qiddamme);
-@MoY = (
-"Oritto",
-"Birre'a",
-"Onkkollessa",
-"Saddasa",
-"Arrasa",
-"Qammo",
-"Ella",
-"Waacibajje",
-"Canissa",
-"Addolessa",
-"Bittitotessa",
-"Hegeya"
-);
-@DoWs = map { substr($_,0,3) } @DoW;
-$DoWs[0] = "Snb";
-$DoWs[1] = "Sno";
-@MoYs = map { substr($_,0,3) } @MoY;
-@AMPM = qw(gorsa warreti-udumma);
-
-@Dsuf = (qw(th st nd rd th th th th th th)) x 3;
-@Dsuf[11,12,13] = qw(th th th);
-@Dsuf[30,31] = qw(th st);
-
-@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;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/German.pm

@@ -1,37 +0,0 @@
-##
-## German tables
-##
-
-package Date::Language::German;
-
-use Date::Language ();
-use vars qw(@ISA @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-@ISA = qw(Date::Language);
-$VERSION = "1.02";
-
-@MoY  = qw(Januar Februar M�rz April Mai Juni
-	   Juli August September Oktober November Dezember);
-@MoYs = qw(Jan Feb M�r Apr Mai Jun Jul Aug Sep Okt Nov Dez);
-@DoW  = qw(Sonntag Montag Dienstag Mittwoch Donnerstag Freitag Samstag);
-@DoWs = qw(Son Mon Die Mit Don Fre Sam);
-
-use Date::Language::English ();
-@AMPM =   @{Date::Language::English::AMPM};
-@Dsuf =   @{Date::Language::English::Dsuf};
-
-@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] }
-sub format_o { sprintf("%2d.",$_[0]->[3]) }
-
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Greek.pm

@@ -1,91 +0,0 @@
-##
-## Greek tables
-##
-## Traditional date format is: DoW DD{eta} MoY Year (%A %o %B %Y)
-##
-## Matthew Musgrove <muskrat@mindless.com>
-## Translations gratiously provided by Menelaos Stamatelos <men@kwsn.net>
-## This module returns unicode (utf8) encoded characters.  You will need to
-## take the necessary steps for this to display correctly.
-##
-
-package Date::Language::Greek;
-
-use utf8;
-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{039a}\x{03c5}\x{03c1}\x{03b9}\x{03b1}\x{03ba}\x{03ae}",
-"\x{0394}\x{03b5}\x{03c5}\x{03c4}\x{03ad}\x{03c1}\x{03b1}",
-"\x{03a4}\x{03c1}\x{03af}\x{03c4}\x{03b7}",
-"\x{03a4}\x{03b5}\x{03c4}\x{03ac}\x{03c1}\x{03c4}\x{03b7}",
-"\x{03a0}\x{03ad}\x{03bc}\x{03c0}\x{03c4}\x{03b7}",
-"\x{03a0}\x{03b1}\x{03c1}\x{03b1}\x{03c3}\x{03ba}\x{03b5}\x{03c5}\x{03ae}",
-"\x{03a3}\x{03ac}\x{03b2}\x{03b2}\x{03b1}\x{03c4}\x{03bf}",
-);
-
-@MoY = (
-"\x{0399}\x{03b1}\x{03bd}\x{03bf}\x{03c5}\x{03b1}\x{03c1}\x{03af}\x{03bf}\x{03c5}",
-"\x{03a6}\x{03b5}\x{03b2}\x{03c1}\x{03bf}\x{03c5}\x{03b1}\x{03c1}\x{03af}\x{03bf}\x{03c5}",
-"\x{039c}\x{03b1}\x{03c1}\x{03c4}\x{03af}\x{03bf}\x{03c5}",
-"\x{0391}\x{03c0}\x{03c1}\x{03b9}\x{03bb}\x{03af}\x{03c5}",
-"\x{039c}\x{03b1}\x{0390}\x{03bf}\x{03c5}",
-"\x{0399}\x{03bf}\x{03c5}\x{03bd}\x{03af}\x{03bf}\x{03c5}",
-"\x{0399}\x{03bf}\x{03c5}\x{03bb}\x{03af}\x{03bf}\x{03c5}",
-"\x{0391}\x{03c5}\x{03b3}\x{03bf}\x{03cd}\x{03c3}\x{03c4}\x{03bf}\x{03c5}",
-"\x{03a3}\x{03b5}\x{03c0}\x{03c4}\x{03b5}\x{03bc}\x{03c4}\x{03bf}\x{03c5}",
-"\x{039f}\x{03ba}\x{03c4}\x{03c9}\x{03b2}\x{03c1}\x{03af}\x{03bf}\x{03c5}",
-"\x{039d}\x{03bf}\x{03b5}\x{03bc}\x{03b2}\x{03c1}\x{03af}\x{03bf}\x{03c5}",
-"\x{0394}\x{03b5}\x{03ba}\x{03b5}\x{03bc}\x{03b2}\x{03c1}\x{03bf}\x{03c5}",
-);
-
-@DoWs = (
-"\x{039a}\x{03c5}",
-"\x{0394}\x{03b5}",
-"\x{03a4}\x{03c1}",
-"\x{03a4}\x{03b5}",
-"\x{03a0}\x{03b5}",
-"\x{03a0}\x{03b1}",
-"\x{03a3}\x{03b1}",
-);
-@MoYs = (
-"\x{0399}\x{03b1}\x{03bd}",
-"\x{03a6}\x{03b5}",
-"\x{039c}\x{03b1}\x{03c1}",
-"\x{0391}\x{03c0}\x{03c1}",
-"\x{039c}\x{03b1}",
-"\x{0399}\x{03bf}\x{03c5}\x{03bd}",
-"\x{0399}\x{03bf}\x{03c5}\x{03bb}",
-"\x{0391}\x{03c5}\x{03b3}",
-"\x{03a3}\x{03b5}\x{03c0}",
-"\x{039f}\x{03ba}",
-"\x{039d}\x{03bf}",
-"\x{0394}\x{03b5}",
-);
-
-@AMPM = ("\x{03c0}\x{03bc}", "\x{03bc}\x{03bc}");
-
-@Dsuf = ("\x{03b7}" 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_o { sprintf("%2d%s",$_[0]->[3],"\x{03b7}") }
-sub format_p { $_[0]->[2] >= 12 ?  $AMPM[1] : $AMPM[0] }
-
-1;
-
-
-

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Hungarian.pm

@@ -1,88 +0,0 @@
-##
-## Hungarian tables based on English
-##
-#
-# This is a just-because-I-stumbled-across-it
-# -and-my-wife-is-Hungarian release: if Graham or
-# someone adds to docs to Date::Format, I'd be
-# glad to correct bugs and extend as neeed.
-#
-
-package Date::Language::Hungarian;
-
-=head1 NAME
-
-Date::Language::Hungarian - Magyar format for Date::Format
-
-=head1 SYNOPSIS
-
-	my $lang = Date::Language->new('Hungarian');
-	print $lang->time2str("%a %b %e %T %Y", time);
-
-	@lt = localtime(time);
-	print $lang->time2str($template, time);
-	print $lang->strftime($template, @lt);
-
-	print $lang->time2str($template, time, $zone);
-	print $lang->strftime($template, @lt, $zone);
-
-	print $lang->ctime(time);
-	print $lang->asctime(@lt);
-
-	print $lang->ctime(time, $zone);
-	print $lang->asctime(@lt, $zone);
-
-See L<Date::Format>.
-
-=head1 AUTHOR
-
-Paula Goddard (paula -at- paulacska -dot- com)
-
-=head1 LICENCE
-
-Made available under the same terms as Perl itself.
-
-=cut
-
-use strict;
-use warnings;
-use base "Date::Language";
-use vars qw( @DoW @DoWs @MoY @MoYs @AMPM @Dsuf %MoY %DoW $VERSION);
-$VERSION = "1.01";
-
-@DoW = qw(Vas�rnap H�tf� Kedd Szerda Cs�t�rt�k P�ntek Szombat);
-@MoY = qw(Janu�r Febru�r M�rcius �prilis M�jus J�nius
-	  J�lius Augusztus Szeptember Okt�ber November December);
-@DoWs = map { substr($_,0,3) } @DoW;
-@MoYs = map { substr($_,0,3) } @MoY;
-@AMPM = qw(DE. DU.);
-
-# There is no 'th or 'nd in Hungarian, just a dot
-@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] }
-sub format_P { lc($_[0]->[2] >= 12 ?  $AMPM[1] : $AMPM[0]) }
-sub format_o { $_[0]->[3].'.' }
-
-
-
-sub format_D { &format_y . "." . &format_m . "." . &format_d  }
-
-sub format_y { sprintf("%02d",$_[0]->[5] % 100) }
-sub format_d { sprintf("%02d",$_[0]->[3]) }
-sub format_m { sprintf("%02d",$_[0]->[4] + 1) }
-
-
-1;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Icelandic.pm

@@ -1,36 +0,0 @@
-##
-## Icelandic tables
-##
-
-package Date::Language::Icelandic;
-
-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(Jan�ar Febr�ar Mars Apr�l Ma� J�ni
-	   J�li �g�st September Okt�ber N�vember Desember);
-@MoYs = qw(Jan Feb Mar Apr Ma� J�n J�l �g� Sep Okt N�v Des);
-@DoW  = qw(Sunnudagur M�nudagur �ri�judagur Mi�vikudagur Fimmtudagur F�studagur Laugardagur Sunnudagur);
-@DoWs = qw(Sun M�n �ri Mi� Fim F�s Lau Sun);
-
-use Date::Language::English ();
-@AMPM =   @{Date::Language::English::AMPM};
-@Dsuf =   @{Date::Language::English::Dsuf};
-
-@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;

data/lib/javonet-ruby-sdk/Binaries/Perl/MacOs/X64/deps/lib/perl5/Date/Language/Italian.pm

@@ -1,36 +0,0 @@
-##
-## Italian tables
-##
-
-package Date::Language::Italian;
-
-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(Gennaio Febbraio Marzo Aprile Maggio Giugno
-	   Luglio Agosto Settembre Ottobre Novembre Dicembre);
-@MoYs = qw(Gen Feb Mar Apr Mag Giu Lug Ago Set Ott Nov Dic);
-@DoW  = qw(Domenica Lunedi Martedi Mercoledi Giovedi Venerdi Sabato);
-@DoWs = qw(Dom Lun Mar Mer Gio Ven Sab);
-
-use Date::Language::English ();
-@AMPM =   @{Date::Language::English::AMPM};
-@Dsuf =   @{Date::Language::English::Dsuf};
-
-@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;