Perl module that calculates the similarity of two strings