形態素解析をMapで行ない、単語の登場回数をReduceで行なうプログラムを書きました。 MapReduceのフレームワークは、MapReduce::Liteを使用しました。 Mapperの定義 文章を受け取って、形態素解析を行ない「(単語,1)」のkey-valueペアを作成します。 形態素解析には、「MeCab+IPA辞書+Text::MeCab」を使用しています。 package WordVectorMaker::Mapper; use Moose; with 'MapReduce::Lite::Mapper'; use Text::MeCab; sub map { my ($self, $key, $value) = @_; my $mecab = Text::MeCab->new; for (my $node = $mecab->parse($value); $node; $no