perl - 如何确定两个字符串是否大部分相等(在 perl 中)？

Question

我有一个字符串，我想与一个字符串数组进行比较，并返回最匹配的数组元素。

我可以编写一个滑动相关器来计算每一步匹配字符的数量并返回最大相关性。但是有更好的方法吗？

例如:
control_string = drv_probability_1_max

列表:
burst_period_min/max
duty_cycle_min/max
概率_0_min/max
probblility_1_min/max

理想情况下它返回“probblility_1_min/max”

Answer 1

您可能正在寻找 String::Similarity 模块。