Perl 的长度函数

Question

为什么 perl 的长度函数会在其结果中添加一个额外的字符？

我有这个简单的代码。

#!/usr/bin/perl
print "enter text ->";
my $variable;
my $variable = <>;
$length = length($variable);
print "$length\n";

但是，例如，当我输入文本“hi”时，长度的输出是 3，而我期望它是 2。

Answer 1

输入末尾的换行符是值的一部分。用chomp删除它：

my $variable = <>;
chomp $variable;
print length $variable;

另外，use warnings 将被通知 $variable 的重复声明。