在Perl中切换与给定与for-when与if-elsif-else

Question

在我写的最后一个脚本中，我需要一个类似于switch语句行为的行为。只需在Perl中搜索等效词，就可以找到use Switch。一开始，一切都很好并且正常工作，直到所有内容都崩溃了并且描述性错误（它发生在具有正则表达式的情况的switch语句中，但奇怪的是它并没有发生在其他类似的switch语句中）。

编辑：崩溃的代码看起来像这样：

switch ($var) {
    case /pattern1/ {...}
    case /pattern2/ {...}
    ...
    else {...}
}

这导致我放弃使用Switch.pm并寻找替代方案。

我找到了given和for-when，当然总是直截了当且有些幼稚if-elsif-else。

1. 为什么Switch.pm如此不稳定？
2. 似乎given和for-when具有相似的结构，但我猜有差异（因为两者都存在）。它是什么？
3. if-elsif-else明显慢于其他选项吗？

Answer 1

Perl的when和智能匹配是实验性的，他们won't成为没有向后不兼容的更改的功能。你不应该使用这些。

Switch.pm是一个源过滤器，因此当出现错误时它会产生错误的错误消息。它也遇到与智能匹配相同的问题。你不应该使用它。

所以，在您列出的选项中，只有一个是可行的，而且它根本不会慢！