キーワード抽出がうまくいかない
自然文からキーワード抽出する機能をもつWebページを作ろうと思い、
Lingua::JA::Summarizeを用いて、下記のようなプログラムを書きました。
コマンドライン上から実行したときはキーワードを抽出してくれたのですが、
サーバを立ち上げ、WEBブラウザ上からアクセスしても
キーワード抽出(@keywordsが空)してくれません。
他のCGIスクリプトは動いているので、apacheあたりの設定ではないような気がします。
一体、何が原因で、どう対処したらいいのでしょうか?
#!/usr/bin/perl use strict;
use Lingua::JA::Summarize;
print "Content-type: text/html; charset=utf-8\n\n";
#キーワード抽出
my $text = '兄貴たちの晩餐';
my $s = Lingua::JA::Summarize->new({ charset => 'utf8',mecab_charset => 'utf8',default_cost => 1.8, singlechar_factor => 0.2,});
$s->analyze($text);
my @keywords = $s->keywords({threshold=>4, maxwords=>10, minwords=>3});
#キーワードの表示
print join(' ', @keywords), "\n";
お礼
回答ありがとうございます。 なるほど、キーワード検索の機能がありますね。 助かりました。