Почему я не могу сопоставить свою строку из стандартного ввода в Perl?

Почему мой сценарий не будет работать правильно?

Я слежу за видео на YouTube и работаю на этого парня.

Я использую Perl в Windows, используя ActiveState ActivePerl 5.12.2.1202

Вот мой крошечный крошечный блок кода.

print "What is your name?\n";
$name = <STDIN>;
if ($name eq "Jon") {
print "We have met before!\n";
} else {
print "We have not met before.\n";
}

Код автоматически переходит к оператору else и даже не проверяет оператор if.

Ответы на вопрос(3)

Ваш ответ на вопрос