Perl语言中qw使用两种不同分隔符的含义？求示例与解释

你提到的《Learning Perl》里的表述，指的是Perl的qw（quote words，快速生成单词列表的操作符）支持用配对的“左-右”字符对作为分隔符，而不是必须用完全相同的字符当首尾分隔符。只要起始分隔符是左向的符号（比如(、[、{、<），结束时就用对应的右向符号（)、]、}、>）即可。

具体示例与解释 #

1. 圆括号配对 #

my @fruits = qw(apple banana cherry);

这里用左圆括号(开头，右圆括号)结尾，效果和qw/apple banana cherry/完全一致，生成包含三个字符串的数组。

2. 方括号配对 #

my @colors = qw[red green blue];

起始用左方括号[，结束用右方括号]，同样会把中间空格分隔的单词转为数组元素。

3. 大括号配对 #

my @tools = qw{hammer screwdriver wrench};

左大括号{对应右大括号}，功能和普通分隔符的qw写法没有区别。

4. 尖括号配对 #

my @days = qw<monday tuesday wednesday>;

左尖括号<搭配右尖括号>，同样能正确生成单词列表。

实用场景 #

这种用法最主要的好处是避免分隔符和列表内容里的字符冲突。比如如果你的列表里包含/字符，用/做分隔符会导致语法错误，改用配对括号就没问题：

# 错误写法：内容里的/会被当成分隔符，引发语法错误
# my @paths = qw(/usr/local /home/user /var/log);

# 正确写法：用圆括号做分隔符，内容里的/不受影响
my @paths = qw(/usr/local /home/user /var/log);

这样不用转义内容里的特殊字符，代码更简洁易读。

内容的提问来源于stack exchange，提问作者Y. zeng