質問編集履歴
1
5/14 18:30 サーバーのエラーログを追記しました。
test
CHANGED
File without changes
|
test
CHANGED
@@ -183,3 +183,57 @@
|
|
183
183
|
すぐに確認致しますので、ご教授いただけますと幸いです。
|
184
184
|
|
185
185
|
どうぞ宜しくお願い致します。
|
186
|
+
|
187
|
+
|
188
|
+
|
189
|
+
|
190
|
+
|
191
|
+
|
192
|
+
|
193
|
+
5/14 18:30追記
|
194
|
+
|
195
|
+
サーバーのエラーログを確認しました。(何度もUPしたせいで同じ表記がたくさんあります。)
|
196
|
+
|
197
|
+
[Tue May 14 17:17:21.572303 2019] [cgi:error] [pid 96140] [client 123.255.245.251:0] AH01215: defined(%hash) is deprecated at ./lib/jcode.pl line 641.: /***当社Web***/request/db-test/database.cgi
|
198
|
+
|
199
|
+
[Tue May 14 17:17:21.572400 2019] [cgi:error] [pid 96140] [client 123.255.245.251:0] AH01215: \t(Maybe you should just omit the defined()?): /***当社Web***/request/db-test/database.cgi
|
200
|
+
|
201
|
+
[Tue May 14 17:17:21.572434 2019] [cgi:error] [pid 96140] [client 123.255.245.251:0] AH01215: defined(%hash) is deprecated at ./lib/jcode.pl line 648.: /***当社Web***/request/db-test/database.cgi
|
202
|
+
|
203
|
+
|
204
|
+
|
205
|
+
これは、「jcode.pl」といつファイルの641行目と648行目に問題があるという事なのでしょうか?
|
206
|
+
|
207
|
+
ちなみにそのファイルの該当箇所(639~651行目)は以下の通りです。
|
208
|
+
|
209
|
+
```
|
210
|
+
|
211
|
+
sub z2h_euc {
|
212
|
+
|
213
|
+
local(*_, $n) = @_;
|
214
|
+
|
215
|
+
&init_z2h_euc unless defined %z2h_euc;
|
216
|
+
|
217
|
+
s/($re_euc_c|$re_euc_kana)/$z2h_euc{$1} ? ($n++, $z2h_euc{$1}) : $1/geo;
|
218
|
+
|
219
|
+
$n;
|
220
|
+
|
221
|
+
}
|
222
|
+
|
223
|
+
|
224
|
+
|
225
|
+
sub z2h_sjis {
|
226
|
+
|
227
|
+
local(*_, $n) = @_;
|
228
|
+
|
229
|
+
&init_z2h_sjis unless defined %z2h_sjis;
|
230
|
+
|
231
|
+
s/($re_sjis_c)/$z2h_sjis{$1} ? ($n++, $z2h_sjis{$1}) : $1/geo;
|
232
|
+
|
233
|
+
$n;
|
234
|
+
|
235
|
+
}
|
236
|
+
|
237
|
+
```
|
238
|
+
|
239
|
+
宜しくお願い致します。
|