Perl 匹配替换 变量 问题？ 急急急！！！

[a95586]

$test = "input";$parrten = "inpu";
if($test =~ /$parrten/){
print "$test\n";
}

结果显示：input

但是因为$parrten的值是inpu而不是input，如果想要在匹配时，只匹配inpu而不是input，即当$test的值为inpu时才能打印显示出来，变量匹配应该怎么写？

[sanGuo_uu]

试试看能不能用

#!/usr/bin/perl 

$test = "input";$parrten = "inpu";
if($test eq $parrten){
print "$test\n";
}

#!/usr/bin/perl 

$test = "input1";$parrten = "input1";
if($test =~ /^$parrten$/){
print "$test\n";
}

[a95586]

嗯，结果差不多，初学Perl，对Perl的理解还是不够。。。谢谢！！！