Perl不会认出我的if语句

时间:2014-05-29 16:18:51

标签: perl

我的代码:

          #!/usr/bin/perl
          $line = <STDIN>;
          if ($line eq "/n") {
              print "That was just a blank line!";
          } else {
              print "That line of input was: $line";
          }

它不会识别$ line in empty或/ n。它只会输出“那条输入线是:”然后它将是空的。但如果$ line实际上是某种东西,它会打印文本。

2 个答案:

答案 0 :(得分:4)

创建换行符是"\n"

答案 1 :(得分:0)

您应该尝试以下操作,使其与空白行匹配

if ($line =~ /^\s+$/)