The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Lingua::JA::Gairaigo::Fuzzy - variant spellings of foreign words in Japanese

SYNOPSIS

    use Lingua::JA::Gairaigo::Fuzzy 'same_gairaigo';
    my $same = same_gairaigo ('メインフレーム', 'メーンフレーム');

DESCRIPTION

Given two Japanese gairaigo words, guess whether they are the same word.

FUNCTIONS

same_gairaigo

    my $same = same_gairaigo ('メイン', 'メーン');

This guesses whether the two words are the same. It catches things like addition and removal of "ー", "・", "ッ", as well as the mixing of elements such as "ティ", "テー", "テイ", and "テ". If the two words appear to be the same, it returns a true value. If the two words appear not to be the same, it returns a false value.

CAVEAT

Because this module is intended to deal with natural language, it does not guarantee to find a correct answer. Bug reports containing test cases are very much appreciated.

AUTHOR

Ben Bullock, <bkb@cpan.org>

COPYRIGHT & LICENCE

This package and associated files are copyright (C) 2012-2014 Ben Bullock.

You can use, copy, modify and redistribute this package and associated files under the Perl Artistic Licence or the GNU General Public Licence.