Perl module implementing Analogical Modeling