@@ -32,23 +32,23 @@ return "" unless defined $string;
32
32
33
33
%translations =
34
34
(
35
- 'iso-8859-1' => 'iso-8859-2 ',
36
- 'Maximal 5 Minute Incoming Traffic' => 'Maksymalny ruch przychodz�cy w ci�gu 5 minut',
37
- 'Maximal 5 Minute Outgoing Traffic' => 'Maksymalny ruch wychodz�cy w ci�gu 5 minut',
38
- 'the device' => 'urz�dzenie ',
35
+ 'iso-8859-1' => 'utf-8 ',
36
+ 'Maximal 5 Minute Incoming Traffic' => 'Maksymalny ruch przychodzący w ciągu 5 minut',
37
+ 'Maximal 5 Minute Outgoing Traffic' => 'Maksymalny ruch wychodzący w ciągu 5 minut',
38
+ 'the device' => 'urządzenie ',
39
39
'The statistics were last updated(.*)' => 'Ostatnie uaktualnienie statystyki $1',
40
- ' Average\)' => ' �rednia )',
41
- 'Average' => '�rednio ',
40
+ ' Average\)' => ' Średnia )',
41
+ 'Average' => 'Średnio ',
42
42
'Max' => 'Maksymalnie',
43
43
'Current' => 'Aktualnie',
44
44
'version' => 'wersja',
45
- '`Daily\' Graph \((.*) Minute' => '`Dzienny\' Graf w ci�gu ($1 Minut/y - ',
46
- '`Weekly\' Graph \(30 Minute' => '`Tygodniowy\' Graf w ci�gu (30 minut - ' ,
47
- '`Monthly\' Graph \(2 Hour' => '`Miesi�czny \' Graf w ci�gu (2 Godzin - ',
48
- '`Yearly\' Graph \(1 Day' => '`Roczny\' Graf w ci�gu (1 Dnia - ',
49
- 'Incoming Traffic in (\S+) per Second' => 'Ruch przychodz�cy - $1 na sekund� ',
50
- 'Outgoing Traffic in (\S+) per Second' => 'Ruch wychodz�cy - $1 na sekund� ',
51
- 'at which time (.*) had been up for(.*)' => 'gdy $1 by� w��czony przez $2',
45
+ '`Daily\' Graph \((.*) Minute' => '`Dzienny\' Graf w ciągu ($1 Minut/y - ',
46
+ '`Weekly\' Graph \(30 Minute' => '`Tygodniowy\' Graf w ciągu (30 minut - ' ,
47
+ '`Monthly\' Graph \(2 Hour' => '`Miesięczny \' Graf w ciągu (2 Godzin - ',
48
+ '`Yearly\' Graph \(1 Day' => '`Roczny\' Graf w ciągu (1 Dnia - ',
49
+ 'Incoming Traffic in (\S+) per Second' => 'Ruch przychodzący - $1 na sekundę ',
50
+ 'Outgoing Traffic in (\S+) per Second' => 'Ruch wychodzący - $1 na sekundę ',
51
+ 'at which time (.*) had been up for(.*)' => 'gdy $1 był włączony przez $2',
52
52
# '([kMG]?)([bB])/s' => '\$1\$2/s',
53
53
# '([kMG]?)([bB])/min' => '\$1\$2/min',
54
54
'([kMG]?)([bB])/h' => '$1$2/g',
@@ -57,8 +57,8 @@ return "" unless defined $string;
57
57
'In' => 'Do',
58
58
'Out' => 'Z',
59
59
'Percentage' => 'Procent',
60
- 'Ported to OpenVMS Alpha by' => 'Port dla OpenVMS Alpha dzi�ki ',
61
- 'Ported to WindowsNT by' => 'Port dla WindowsNT dzi�ki ',
60
+ 'Ported to OpenVMS Alpha by' => 'Port dla OpenVMS Alpha dzięki ',
61
+ 'Ported to WindowsNT by' => 'Port dla WindowsNT dzięki ',
62
62
'and' => 'i',
63
63
'^GREEN' => 'ZIELONY',
64
64
'BLUE' => 'NIEBIESKI',
@@ -79,11 +79,11 @@ foreach $i (keys %translations)
79
79
%wday =
80
80
(
81
81
'Sunday' => 'Niedziela', 'Sun' => 'Nie',
82
- 'Monday' => 'Poniedzia�ek ', 'Mon' => 'Pon',
82
+ 'Monday' => 'Poniedziałek ', 'Mon' => 'Pon',
83
83
'Tuesday' => 'Wtorek', 'Tue' => 'Wto',
84
- 'Wednesday' => '�roda ', 'Wed' => '�ro ',
84
+ 'Wednesday' => 'Środa ', 'Wed' => 'Śro ',
85
85
'Thursday' => 'Czwartek', 'Thu' => 'Czw',
86
- 'Friday' => 'Pi�tek ', 'Fri' => 'Pi� ',
86
+ 'Friday' => 'Piątek ', 'Fri' => 'Pią ',
87
87
'Saturday' => 'Sobota', 'Sat' => 'Sob'
88
88
89
89
);
@@ -94,10 +94,10 @@ foreach $i (keys %translations)
94
94
'Jan' => 'Sty', 'Feb' => 'Lut', 'Mar' => 'Mar',
95
95
'April' => 'Kwietnia', 'May' => 'Maja', 'June' => 'Czerwca',
96
96
'Apr' => 'Kwi', 'May' => 'Maj', 'Jun' => 'Cze',
97
- 'July' => 'Lipca', 'August' => 'Sierpnia', 'September' => 'Wrze�nia ',
97
+ 'July' => 'Lipca', 'August' => 'Sierpnia', 'September' => 'Września ',
98
98
'Jul' => 'Lip', 'Aug' => 'Sie', 'Sep' => 'Wrz',
99
- 'October' => 'Pa�dziernika ', 'November' => 'Listopada', 'December' => 'Grudnia',
100
- 'Oct' => 'Pa� ', 'Nov' => 'Lis', 'Dec' => 'Gru'
99
+ 'October' => 'Października ', 'November' => 'Listopada', 'December' => 'Grudnia',
100
+ 'Oct' => 'Paź ', 'Nov' => 'Lis', 'Dec' => 'Gru'
101
101
);
102
102
103
103
@foo=($string=~/(\S+),\s+(\S+)\s+(\S+)(.*)/);
@@ -108,7 +108,7 @@ foreach $i (keys %translations)
108
108
@quux=split(/at/,$foo[3]);
109
109
$foo[3]=$quux[0]." o godzinie".$quux[1];
110
110
};
111
- return "$wday{$foo[0]} dzie� $foo[1]. $month{$foo[2]} $foo[3]";
111
+ return "$wday{$foo[0]} dzień $foo[1]. $month{$foo[2]} $foo[3]";
112
112
};
113
113
114
114
#
0 commit comments