私の文字列入力でeqが動作しないのはなぜですか？

Question

ちょうどPerlを学び始めました。つまり、プログラムの流れを学びました。文字列と数値を評価し、適切な演算子を使用することの主な相違点を学びました。シンプルなスクリプトは、私はここで、それはスーパーシンプルなので、私は狂った運転している "マイク"に入力されている必要があります実行され、動作しないステートメント。代わりにelse文を出力します。

#!C:\strawberry\perl\bin\perl.exe 

use strict; 
#use warnings; 
#use diagnostics; 

print("What is your name please?"); 
$userName = <STDIN>; 


if($userName eq "mike"){ 
    print("correct answer"); 
} 
else{ 
    print("Wrong answer"); 
} 

Answer 1

私はあなたの質問を読んでいたので、文字列と同等の数値との間に問題があると思っていました。以下のケースを考えてみてください。

#!/usr/bin/env perl 

use strict; 
use warnings; 

print("What is the meaning of life, the universe and everything? "); 
chomp(my $response = <STDIN>); 

if ($response == 42) { 
#if (42 ~~ $response) { 
    print "correct answer\n"; 
} else { 
    print "Wrong answer\n" ; 
} 

ifステートメントを試してみてください。 familyのような素敵なものに答え、何が起こるかを見てください。 ~~はPerlでこの問題の一部を助けたスマートマッチ演算子です。詳細はhere（詳細は「スマートマッチング」を参照）をご覧ください。 chomp演算子のインライン使用にも注意してください。

Answer 2

てみてくださいあなたはSTDINからあなたの価値を取得した後、ムシャムシャ食べるために呼び出しを追加助けてください：

$userName = <STDIN>; 
chomp($userName); 

STDINから読み取った値が、最後に改行文字を持つことになりますので。 chomp（）ビルトインは、文字列の最後から改行を削除します。