windows - Perl:如何将编码添加到 PAR 打包存档

Question

以下程序:

use Encode qw(:all);

my @list = Encode->encodings();
print join("\n", @list);

如果我将脚本作为 .pl 或作为可执行文件运行，由 pp.bat 创建(使用 ActiveState Perl)，会给出不同的结果 如果我运行由 pp.bat 创建的 a.exe，可用编码列表非常短。如何添加编码？

Answer 1

您应该直接在代码中添加模块。

use Encode qw(:all);

use Encode::Byte;
use Encode::CN;
use Encode::JP;
use Encode::KR;
use Encode::TW;

my @list = Encode->encodings();
print join("\n", @list);