Perl module for matching strings MasterMind style (Match MasterMind)