[date:20080224]の検索結果


任意のキーワードリストに含まれるテキスト中のキーワードに、特定のページ(URL)にリンクするPerlのサンプルスクリプトを作ってみました。ブログソフトとか掲示板ソフトを開発する際に役に立つと思います。文字エンコードがUTF-8、EUCではOKでしたが、SJISではうまく動きませんでした。

以下、サンプルスクリプトの一部です。
my @wordlist = ('はてな', 'ブログ', 'アルファブロガー');
foreach my $word (@wordlist) {
my $encword = $word;
$encword =~ s/(\W)/'%'.unpack('H2', $1)/eg; # uri encode
my $link = "<a href=\"serach.cgi?querystr=$encword\">$word</a>";
$text =~ s/$word/$link/g;
# アンカーテキストのキーワードは元に戻す
my $pattern = "(<a href.+)<a href.+$word</a>(.+/a>)";
$text =~ s/$pattern/$1$word$2/g;
}
print $text;

リンクの処理のところが微妙ですが、適当に修正して使っていただければ幸いです。

はてなダイアリーのキーワードにリンクするためのサンプルもあるようです。動かしてみたわけでないのでハッキリとはいえませんが、ソースを見る限りテキスト内でアンカータグでリンクを行っている場合は、まずいような気もします。

はてなダイアリーキーワード自動リンクAPI - はてなダイアリー日記
なお、上記ファイルは現状で300KBほどありますので、アプリケーション側で一定時間キャッシュして頂くなどの措置をお願いできればと思います。
テキスト一つ処理するだけで300KBですか、はてな側も大変かも知れませんが呼び出す方も大変ですね。
[225] Posted by buzei at 2008/02/24 23:46:55
0 point | Link (1) | Trackback (0) | Comment (0)

  1  


アクセスランキング

今日のアクセスランキング(上位10件)

  1. [大阪維新の会]大阪市交通局の市長選支援職員リスト捏造事件 (13 PV)
  2. スクエニ和田洋一社長、FF14の不評を認める (12 PV)
  3. 日本IT漫画新聞 (12 PV)
  4. 鳩山辞任で民主党支持率急回復、ネトウヨ狼狽 (12 PV)
  5. NBA ジャージ (10 PV)
  6. ヨルダン政府、ヨルダン人パイロット殺害の報復としてリシャウィ死刑囚の死刑を執行 (10 PV)
  7. 藤原紀香、陣内智則夫妻が離婚 (10 PV)
  8. シャア専用携帯「913SH G TYPE-CHAR」 (10 PV)
  9. アナログマとは (9 PV)
  10. ブレイドクロニクル RMT (9 PV)

今月のアクセスランキング(上位10件)

  1. 掲示板フリーソフト - 無料で利用できる掲示板CGI (27 PV)
  2. 掲示板やチャットなどのフリーPHPスクリプトの配布サイト (23 PV)
  3. 【速報】パナマ文書に記載されている日本企業、日本人の一覧リスト (17 PV)
  4. スクエニ和田洋一社長、FF14の不評を認める (15 PV)
  5. WebRMT【ウェブRMT】-ラペルズ-RAPPELZ-RMT (14 PV)
  6. k本的に無料ソフト・フリーソフト (14 PV)
  7. [大阪維新の会]大阪市交通局の市長選支援職員リスト捏造事件 (14 PV)
  8. 日本IT漫画新聞 (14 PV)
  9. NBA ジャージ (13 PV)
  10. 鳩山辞任で民主党支持率急回復、ネトウヨ狼狽 (13 PV)

アクセス統計

ディレクトリ

関連サイト