我写了一个Perl程序,用户应该键入一个用户名.如果他们进入admin,他们应该看到消息
Welcome, admin!
Run Code Online (Sandbox Code Playgroud)
否则控制台输出应该是
The username is incorrect
Run Code Online (Sandbox Code Playgroud)
这是我的代码
use utf8;
print "Username: ";
$username = <STDIN>;
if ( $username eq "admin" ) {
print "Welcome, admin!";
}
else {
print "The username is incorrect.";
}
Run Code Online (Sandbox Code Playgroud)
但无论用户输入什么,程序都会进入else分支机构.
为什么会这样?