Perl 的标量逗号运算符什么时候有用？

Question

除了在 for 循环之外，是否有任何理由在任何地方使用标量逗号运算符？

Answer 1

由于 Perl 标量逗号是 C 逗号运算符的“端口”，这些注释 可能是恰当的：

有时候，你会发现自己身处
C 期望的情况
单个表达式，但你有两个
你想说的话。最
常见（实际上是唯一常见）
示例位于 for 循环中，具体来说
第一、第三控制
表达式。如果（例如）你怎么办
想要一个其中 i 计数的循环
同时从 0 上升到 10
j 正在从 10 倒计时到 0？

因此，我认为您的直觉认为它主要在 for 循环中有用，这是一个很好的直觉。

Answer 2

我偶尔会在条件（有时错误地称为“三元”）运算符中使用它，如果代码比将其分解为真正的 if/else 更容易阅读：

my $blah = condition() ? do_this(), do_that() : do_the_other_thing();

它也可以在最后结果很重要的某些表达式中使用，例如在 grep 表达式中，但在这种情况下，它与使用分号相同：

my @results = grep { setup(), condition() } @list;