Tag Cloudをつくる - no name wiki

やりたいこと

• 文章からタグクラウドをつくる。
• お勉強をかねてperlで実装

Step 1 とにかくTagCloudをつくってみる。

• HTML::TagCloudモジュールをつかってみる。

CPANモジュールのインストールの仕方

• CPANの使い方 http://homepage3.nifty.com/hippo2000/perltips/CPAN.htmを参考にHTML::TagCloudをインストール。自動でうまくいかなかったので、ダウンロード⇒解凍⇒手動でコピー。*.pmをPERL/lib/HTML/におけばよいみたい。

TagCloudモジュールの使い方

• TagCloudモジュールのつかいかた http://katsubemakito.net/cgiperl/cgi/cat150/perl-tagcloud.htmlにあったサンプルをちょっといじってみた。

//tagcloud.pl
use strict;
use HTML::TagCloud;

my $cloud = HTML::TagCloud->[[new]];

$cloud->add('a', '', 1);
$cloud->add('b', '', 2);
$cloud->add('c', '', 3);
$cloud->add('d', '', 4);
$cloud->add('e', '', 5);
$cloud->add('f', '', 6);
$cloud->add('g', '', 7);
$cloud->add('h', '', 8);
$cloud->add('i', '', 9);
$cloud->add('j', '', 10);

print $cloud->html_and_css;

んで実行。

perl tagcloud.pl > tagcloud.html

すると、こんなのができる。⇒tagcloud.html

とりあえず、できたということで、STEP１終了！

Step 2 英文テキストファイルを入力として使う。

まずは、単語の区別が楽な英文から。入力文章の単語とその出現数をカウントすればよいかな。

• 単語わけ

@in =

• 頻度算出

Step3 日本語を入力として使う。

単語の区別ができれば、英文と同じでいけるはず。でも、その単語区別が難しそう。yahoo
の形態素なんとかをつかってみようか・・。