Perl中的简单多个if语句不起作用

时间:2017-03-05 21:04:25

标签: perl

我在Perl中使用if语句和/或运算符。无论我输入什么,它都会转向其他声明。我做错了什么?

my $ans = <STDIN>;
print "answer: $ans\n";

if ($ans eq "a" || $ans eq "b") {
    print "you entered a or b";
}
elsif ($ans eq "c" || $ans eq "d") {
    print "you entered c or d";
}
else {
    print "not a b c d ";
}

1 个答案:

答案 0 :(得分:2)

你忘了chomp;。您最终只使用"a\n"中的$ans,而不只是"a"