perl - Encode::encode 是否修改/删除原始字符串？

Question

这个问题在这里已经有了答案:





Why does encode delete the argument?

(1 个回答)


6年前关闭。




Encode::encode 的文档说:

encode

$octets = encode(ENCODING, STRING[, CHECK]) Encodes the scalar value STRING from Perl's internal form into ENCODING and returns a sequence of octets.

这是一个测试脚本:

use feature qw(say);
use strict;
use warnings;
use utf8;
use open qw( :std :utf8 );

use Encode qw(encode);

my $str = 'æ';
say "str = '$str'";
my $str2 = encode('UTF-8', $str, Encode::FB_CROAK);
say "str = '$str'";

输出是:

str = 'æ'
str = ''

为什么是 $str通话后删除 encode ?这是意料之中的吗？

Answer 1

“如果 Encode::LEAVE_SRC 位未设置但 CHECK 已设置，则 encode() 或 decode() 的源字符串将被原地覆盖。如果您对此不感兴趣，则将其与位掩码。”

引自 Encode文档。