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.