如何创建一个匹配几个相似字符串的正则表达式？

Question

我正在寻找一个可以将多个字符串作为输入的函数，并创建一个匹配所有字符串的正则表达式。

例如，假设输入为：

• 有趣的狗
• 有趣的狗
• 有趣的狗

它应该输出如下内容：

/fun(ny)? dogs?/

我想知道Levenshtein距离是否可以用于此目的，但没有任何线索......您怎么看？

Answer 1

你不是说正则表达式的味道。 Perl附带了一个名为Regex::PreSuf的东西，可以做这种事情。