Active perl で日本語表示その他で文字化け

Question

Active perl で日本語表示その他で文字化けがひどいのですがその対処法を教えて下さい。今はWINDOWS環境ですが近いうちにLinuxに移植するつもりです、そしたら直るっていうことはないですかね？

#!C:/perl64/bin/perl
use utf8;
use CGI;
$query = new CGI;
use CGI qw(:standard);
use File::Copy;

require 'jcode.pl';
use jcode.pl;

binmode STDIN, ':utf8';
binmode STDOUT, ':utf8';
binmode STDERR, ':utf8';

#use strict;
#use warnings;
#use DBI;
#use DBD::SQLite;
#追加use
use utf8;
#use CGI;
#$query = new CGI;
#use CGI qw(:standard);
#use File::Copy;

#binmode STDIN, ':utf8';
#binmode STDOUT, ':utf8';
#binmode STDERR, ':utf8';

#use strict;
#use warnings;
#追加use終了

#binmode STDIN, ':encoding(cp932)';
#binmode STDOUT, ':encoding(cp932)';
#binmode STDERR, ':encoding(cp932)';

コードの最初の部分です。このようにしても文字化けします。解決策の程、宜しくお願い致します。

Comments

[CHERRY]

情報が不足しています。まず、OSやPerl 等のバージョン情報。そして、どのようなプログラムを実行したらどのように文字化けするのかを質問に追記してください。

[trm]

use utf8;　binmode STDOUT, ':utf8';　と記しても文字化けします。

Answer 1

ほぼ間違いなく Windows の問題ではなくスクリプトの問題なので直りません。

追記

それよりもマルチポストです。
前の質問で回答されたことを実践してください。
二行書けばそれでいいというわけではありません。
何を言われたかきちんと理解した上でスクリプトのエンコードとかその他もろもろチェックしてください。

Answer 2

https://teratail.com/questions/105443

別の回答を思い出しました。こっちも読んでいただきましょう。
https://teratail.com/questions/103103

Comments

[trm]

binmode STDOUT, ':utf8'; を書き加えても文字化けは直りませんでした。

Answer 3

なんか盲点になっていそうなので、とりあえず。
（他の質問を見たら、まだ解決していないらしいし）

ソースファイルの保存時の文字コードは何になってます？UTF-8で処理しようとしているなら、UTF-8にして保存していないとダメです。

Comments

[退会済みユーザー]

多分このフレンズ（質問者）は　SJIS以外つかえないフレンズなんだよ・・・

[archiver]

他の質問のやり取り見て、それは思った。
VB6での開発経験しかなければ、文字コードなんて全然意識しないだろうし。しかも、かなり昔の話。

Answer 4

Jcode.pl いまは Jcode.pm だったか
懐かしいな

Comments

[KojiDoi]

10年前に時代遅れになったモジュールです。今更出番はありません。

[退会済みユーザー]

だよね・・・・