Perl的长度函数

Question

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

我有这个简单的代码。

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

但是，当我输入文本“喜”，例如，长度的输出是3，而我希望它为2

Answer 1

换行符在输入的端部是的价值。与chomp删除它：

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

此外，use warnings通知的$variable重复申报。