Unix 命令的 Perl 用户输入

Question

有人可以帮我解决我在这里做错的事情，我一直在挠头。我对 perl 了解不多，只是对 irssi 脚本进行了一些小改动。

            $selectedname = <STDIN>;
            $Nameslist = `grep -i -w '$selectedname'~/file`;

它工作正常，我遇到的问题是变量似乎没有正确插入。例如，如果我在命令行中使用单词 test 输入相同的命令，则会显示 3 行。但是如果我在这个脚本中使用相同的词，它就会变成空的。

我知道它工作正常，因为我可以做 * 作为输入，它会显示整个文件。它只是不适用于输入的字符串。

任何帮助将不胜感激，这真的让我很难过。

Answer 1

其实当你使用<STDIN> , 一个新的行字符来了。所以你需要删除换行符。您可以使用 咀嚼 删除换行符

代码:

   $selectedname = <STDIN>;
   chomp($selectedname);
   $Nameslist = `grep -i -w '$selectedname'~/file`;