質問編集履歴
1
5/14 18:30 サーバーのエラーログを追記しました。
title
CHANGED
File without changes
|
body
CHANGED
@@ -90,4 +90,31 @@
|
|
90
90
|
|
91
91
|
見ていただくにあたり、不足している箇所等ありましたら
|
92
92
|
すぐに確認致しますので、ご教授いただけますと幸いです。
|
93
|
-
どうぞ宜しくお願い致します。
|
93
|
+
どうぞ宜しくお願い致します。
|
94
|
+
|
95
|
+
|
96
|
+
|
97
|
+
5/14 18:30追記
|
98
|
+
サーバーのエラーログを確認しました。(何度もUPしたせいで同じ表記がたくさんあります。)
|
99
|
+
[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
|
100
|
+
[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
|
101
|
+
[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
|
102
|
+
|
103
|
+
これは、「jcode.pl」といつファイルの641行目と648行目に問題があるという事なのでしょうか?
|
104
|
+
ちなみにそのファイルの該当箇所(639~651行目)は以下の通りです。
|
105
|
+
```
|
106
|
+
sub z2h_euc {
|
107
|
+
local(*_, $n) = @_;
|
108
|
+
&init_z2h_euc unless defined %z2h_euc;
|
109
|
+
s/($re_euc_c|$re_euc_kana)/$z2h_euc{$1} ? ($n++, $z2h_euc{$1}) : $1/geo;
|
110
|
+
$n;
|
111
|
+
}
|
112
|
+
|
113
|
+
sub z2h_sjis {
|
114
|
+
local(*_, $n) = @_;
|
115
|
+
&init_z2h_sjis unless defined %z2h_sjis;
|
116
|
+
s/($re_sjis_c)/$z2h_sjis{$1} ? ($n++, $z2h_sjis{$1}) : $1/geo;
|
117
|
+
$n;
|
118
|
+
}
|
119
|
+
```
|
120
|
+
宜しくお願い致します。
|