cgiのメール送信時？のエラー

cgiのページでエラーが表示されておりメール送信機能が怪しいと思っているのですが
どう修正していいのかわかりません。
perlのバージョンが以前使っていたものよりも新しい（5.18）からかもしれません。

$subject = mimeencode( jcode'jis($subject) );
$body = jcode'jis($body);
エラー詳細を見ても恐らくここの表記だと思うのですが…
requireは mimew.plとjcode.plを読み込んでいます。

修正の仕方等ご存知の方がいましたら、ご教授お願いいたします。

行動規範の内容に同意します

回答4件

その前ですと、
print "</center></body></html>\n";
exit;
printはこれくらいです。

投稿2014/11/25 06:50

GIRLibra

総合スコア33

後はログインの条件分岐ですとか、表示に関する処理で有用な情報はないかと思われるのですが。。

投稿2014/11/25 06:41

GIRLibra

総合スコア33

文字コードはshiftjisで改行コードはCR+LFです。

投稿2014/11/25 03:37

GIRLibra

総合スコア33

エラーの詳細がわからないとなんとも言えませんが、jcode'jisをjcode::jisに置換すると動くかもしれません。
ライブラリ(jcode.plなど)を使っている場合は、そのバージョンも記載しないと正確な回答は出ないと思います。

投稿2014/11/21 07:36

TaMaMhyu

総合スコア1356

GIRLibra

2014/11/21 07:53

ありがとうございます。エラーの詳細は502.2 指定された CGI アプリケーションは、正しく動作しませんでした。HTTP ヘッダーの完全なセットが返されませんでした。返されたヘッダーは "Set-Cookie: expires=Tue, 20-Jan-2015 07:50:08 GMT; wè³ê½pXª©Â©èÜ¹ñB Content-type: text/html <html><head><META HTTP-EQUIV="Content-type" CONTENT="text/html; charset=Shift_JIS"> なんだか途中文字化けしております。 jcode.plのバージョンがわからないのですが、インストールされているperlに対して古いものかと思います。宜しくお願いいたします。

TaMaMhyu

2014/11/21 08:27

ソースコードの文字コードの関係だとは思うのですが…まだ特定できていません。正直なところ、jcode.plとかUTF-8以外のソースコードは新しいバージョンのPerlではお勧めできません。

GIRLibra

2014/11/21 09:16

恐らく文字コード関係だと思います。 jacode.plに差し替えたところエラーがUndefined subroutine &jacode::jis calledと変わりました。jisではない…？そうですね、本当にその通りなのですが現状こうなってしまったので…。　

TaMaMhyu

2014/11/21 09:30

もし互換モジュールに差し替えるなら、Jcode.pmの方がいいかもしれません。

TaMaMhyu

2014/11/21 09:35

jacode.plはjcode.plと同じjcode::から始まるパッケージ名だと思います。

GIRLibra

2014/11/21 09:45

差し替えなくて済むなら差し替えない方がよいのですが、変換部分の記述が間違っているのでしょうか。 jcode.pmも試してみたのですが、また文字化けしたようなエラーになってしまいました。 use Jcode; $subject = mimeencode( jcode'jis($subject) ); $body = jcode'jis($body); 上記の記述はどう変更になるかご存じでしょうか。

TaMaMhyu

2014/11/21 09:59

Jcode.pmの場合は、jcode'をJcode::に差し替えだと思います。 jacode.plの場合は、jcode'をjcode::に差し替えだと思います。

GIRLibra

2014/11/21 10:33

やはりどちらも同じエラーとなってしまいました…

TaMaMhyu

2014/11/21 13:08

ソースコードの文字コードと改行コードはどうなっているでしょうか？

GIRLibra

2014/11/25 03:38

文字コードはshiftjisで改行コードはCR+LFです。

TaMaMhyu

2014/11/25 04:25

Set-Cookieヘッダ、Content-Typeヘッダを出力している処理があると思いますが、そこ＋その周辺のコードを開示することは可能でしょうか？

GIRLibra

2014/11/25 06:30

sub header { print "Content-type: text/html\n\n"; print "<html><head><META HTTP-EQUIV=\"Content-type\" CONTENT=\"text/html; charset=Shift_JIS\">\n"; ここらへんでしょうか？あとはcss等の読み込みが書いてあります。

TaMaMhyu

2014/11/25 06:31

そのheaderを呼び出しているところと周辺はどうなっているでしょうか？

GIRLibra

2014/11/25 06:41

後はログインの条件分岐ですとか、表示に関する処理で有用な情報はないかと思われるのですが。。

GIRLibra

2014/11/25 06:43

perlのバージョンも新しくなったのですが、サーバもapachからIISになっています。そちらも関係あるのかもしれません。

TaMaMhyu

2014/11/25 06:47

headerを呼び出しているところより前で、printしているところは何をprintしているでしょうか？

GIRLibra

2014/11/25 06:51

その前ですと、 print "</center></body></html>\n"; exit; printはこれくらいです。

TaMaMhyu

2014/11/25 06:52

IISのバージョンがわからないので役に立つかわかりませんが、 http://perl-users.jp/articles/advent-calendar/2010/win32/13 このような情報を見かけました。 BEGINなどを仕込むとなにか出てくるのかもしれません。

GIRLibra

2014/11/25 06:53

http://cgi-design.net/prog/sche/ こちらのスケジュールを使っているようです。

TaMaMhyu

2014/11/25 06:54

それはおそらくheader関数自体の前ではないでしょうか？気になっているのはheader関数を呼び出しているところの前です。文字化けした文字列を出しているかもしれないところがないか気にしています。

GIRLibra

2014/11/25 07:05

すみません、ちょっと良くわからないのですが、エラーでは確かに文字化けして出力されています。（#は文字化けしている部分です。）返されたヘッダーは "############# Content-type: text/html <html><head><META HTTP-EQUIV="Content-type" CONTENT="text/html; charset=Shift_JIS"> <title>#########</title>

TaMaMhyu

2014/11/25 07:10

sub header以外で、headerと記述されているところがないでしょうか？最初に文字化けしているのがSet-Cookieの後ろでContent-Typeの前のように見受けられたので、header関数では先頭でContent-Typeを出力しているようなので、その前の処理内容が気になりました。

TaMaMhyu

2014/11/25 07:16

ただ、それはそれとして先ほどコメントした、 http://perl-users.jp/articles/advent-calendar/2010/win32/13 ここに書かれているような、Content-TypeヘッダをBEGINで先頭の方に仕込めば、文字化けしているところが何なのかわかるかもしれません。文字コードはどうなっているかよくわからないので、charsetを色々変えながら試す必要があるかもしれません。

GIRLibra

2014/11/25 07:27

&headerがありました。ですが複数あり、その前の処理というのがわかりませんでした。

TaMaMhyu

2014/11/25 07:41

Set-Cookieヘッダを出力しているところはどこかの&headerの前にありますか？

GIRLibra

2014/11/25 08:21

Set-Cookieヘッダを出力しているところ付近にはheaderはありません。始めの出力時は正常に表示されるのですが、登録が完了しメールが送信され（されませんが）再び同じページに戻ってきたときにエラーが発生いたします。

TaMaMhyu

2014/11/25 08:30

コード全体が見えないとこれ以上は判断が難しいので、とりあえず、BEGINでContent-Typeヘッダ（charset付き）を仕込んでみるぐらいしか思いつきません。おそらく、Perlからエラーが出ている（エラーの内容が文字化けしている）のではないかと思っています。