Все модули написаны на Perl и не обеспечивают должной производительности при необходимости большого числа сравнений, рекомендую воспользоваться следующей функцией.