Perl 钻石运算符内部的奇怪事情

Question

请任何人都可以帮我解决这个问题：

perl -e 'print for <{a,b,c}{1,2,3}>'

我只是不明白它是如何工作的。它有效！ 按产出生产

a1a2a3b1b2b3c1c2c3

。

有谁知道钻石运营商内部发生了什么？

Answer 1

这是表示 globbing 的另一种方式。基本上，花括号告诉 glob 运算符将每个逗号分隔的元素放入其中并组合所有可能性。

更清晰的方法是用逗号分隔各个输出：

$ perl -e 'print join ",", <{a,b,c}{1,2,3}>;'
a1,a2,a3,b1,b2,b3,c1,c2,c3

---

来自 perldoc -f glob：

如果非空大括号是全局中使用的唯一通配符，
没有匹配的文件名，但可能会返回许多字符串。
例如，这会产生九个字符串，每个字符串对应一个
水果和颜色：

@many = glob "{苹果,番茄,樱桃}={绿色,黄色,红色}";