以下代码不输出任何内容：
print (1 == 2)."a";
就像这样：
print qw< One Two Three > . "a";
但是这会输出一个雪人,然后是字母a,如预期的那样：
print chr(0x2603)."a";
是否存在连接一般“事物”的一般方法,因为缺少一个更好的单词(例如函数输出和布尔比较的结果)与字符串片段总是有效？因为.运算符似乎不可靠.
解决方法
由于列表和上下文在Perl中的工作方式,这是预期的行为.
发生了什么
这条线
print (1 == 2)."a";
解析如下：
( print( 1 == 2 ) . "a" )
由于1 == 2返回一个空字符串,因此不打印任何内容.然后将打印本身的返回值与a连接并丢弃.
如果你打开了使用警告(你应该总是这样做,以及严格使用),你会看到：
print (…) interpreted as function at -e line 1.
Useless use of concatenation (.) or string in void context at -e line 1.
这条线
print qw< One Two Three > . "a";
事实上,是否打印字符串Threea.那是因为qw<一二三>相当于表达式('One','Two','Three').连接运算符.将该表达式放在标量上下文中,标量上下文中逗号运算符的行为是返回其右侧操作数.因此表达式减少到Threea.再次,如果你有警告,你会看到：
Useless use of a constant (“One”) in void context at -e line 1.
Useless use of a constant (“Two”) in void context at -e line 1.
这个故事的主旨
use strict; use warnings;