使用Perls Dot运算符的字符串连接错误

Question

我试图从用户键盘读取两个字符串的输入，将它们存储在两个变量中，并使用Perls点运算符将两个字符串连接在一起。

我在网上找到的研究显示了一个类似于我想要完成的例子。此示例在串联中仅使用一个字符串变量，但我认为类似的东西应该能够将多个变量连接在一起：

$name = checkbook'; 
$filename = '/tmp/' . $name . '.tmp'; 

#$filename now contains "/tmp/checkbook.tmp"

（http://alvinalexander.com/perl/edu/articles/pl010003.shtml）

我的代码显示在下面 - 但是，我仍然得到不希望的连接：

$stringa=<STDIN>;
$stringb=<STDIN>;
print $stringa.$stringb;

使用perl（path）编译

输出

     nein
     ja
     nein
     ja

而不是所需的输出：

 nein
 ja
 neinja

为什么我没有得到我认为它应该产生的串联输出？

Answer 1

你可以使用＆＃34; chomp＆＃34;删除尾随字符串＆＃34; \ n＆＃34;，如下所示：

$stringa=<STDIN>;
$stringb=<STDIN>;
chomp($stringa);
chomp($stringb);
print $stringa.$stringb;