String::Approx might cover your needs. Straight regular expressions to do it would be convoluted at best (accounting for scrambling, insertions, deletions).