perl WordNet::Multi 使い方 メモ

マニュアル引用

use WordNet::Multi;

&WordNet::Multi::wnDbOpen("wnjpn-0.9.db");
@synsets = &WordNet::Multi::wnAllSynsets;
@words_en = &WordNet::Multi::wnWord("02084071-n", "eng");
@words_ja = &WordNet::Multi::wnWord("02084071-n", "jpn");
@synsets = &WordNet::Multi::wnSynPos("dog", "v", "eng");
@hypes = &WordNet::Multi::wnRel("02084071-n", "hype");

「wnjpn-0.9.db」はインストールしたディレクトリ「WordNet-Multi-0.1」の「t」の中にある。
こいつを実行するperlのある場所へコピーしてやれば

&WordNet::Multi::wnDbOpen("wnjpn-0.9.db");

のエラーが消えて使用可能な状態になる。

@hypes = &WordNet::Multi::wnRel("02084071-n", "hype");

は単語「02084071-n」の上位関係の単語を取得

@hypos = &WordNet::Multi::wnRel("02084071-n", "hypo");

とすれば単語「02084071-n」の下位関係の単語を取得できる。