http://www.perlmonks.org?node_id=162097


in reply to How do I find the percentage of similarity between strings?

use String::Approx 'adistr';