teratail header banner
teratail header banner
質問するログイン新規登録

質問編集履歴

1

5/14 18:30 サーバーのエラーログを追記しました。

2019/05/14 09:30

投稿

m_nan
m_nan

スコア11

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
+ 宜しくお願い致します。