「はてブでランダムジャンプ」(2008年リリース)を大幅にリニューアル
2016-01-30-2
[Maintenance][Programming]
ソーシャルブックマークサービス「はてなブックマーク」の人気エントリ(みんながブックマークしているページ)をランダムにピックアップしてジャンプさせるサービス「はてブでランダムジャンプ」を大幅にリニューアルしました。どうぞご利用ください。
今更ながら iframe を使用しました。上のバナー部分のランダムジャンプボタンをクリックすると、タブ切り替え無しで次から次へとランダムに人気ページを読み込んで表示していきます。iframe で表示されないページは、バナーのリンクを直接クリックして表示しましょう。
また、ランダムジャンプの飛び先ははてなブックマークの全てのカテゴリから取得するようにしました。つまりは大増量です。これらのURLリストは「現時点でのジャンプ先の一覧」で見ることができます。全てRSSから取得、1時間に1回更新。
使っているRSSの一覧です。サンプルプログラム(RSSからURLのみ取得)と一緒にどうぞ。「総合」は他と重複するので使っていません。
- はてブでランダムジャンプ
http://hatebu.ta2o.net/rj.cgi
今更ながら iframe を使用しました。上のバナー部分のランダムジャンプボタンをクリックすると、タブ切り替え無しで次から次へとランダムに人気ページを読み込んで表示していきます。iframe で表示されないページは、バナーのリンクを直接クリックして表示しましょう。
また、ランダムジャンプの飛び先ははてなブックマークの全てのカテゴリから取得するようにしました。つまりは大増量です。これらのURLリストは「現時点でのジャンプ先の一覧」で見ることができます。全てRSSから取得、1時間に1回更新。
使っているRSSの一覧です。サンプルプログラム(RSSからURLのみ取得)と一緒にどうぞ。「総合」は他と重複するので使っていません。
#!/usr/bin/env perl use strict; use warnings; use LWP::Simple; my @list = ( # ['総合','http://b.hatena.ne.jp/hotentry.rss'], ['世の中','http://b.hatena.ne.jp/hotentry/social.rss'], ['政治と経済','http://b.hatena.ne.jp/hotentry/economics.rss'], ['暮らし','http://b.hatena.ne.jp/hotentry/life.rss'], ['学び','http://b.hatena.ne.jp/hotentry/knowledge.rss'], ['テクノロジー','http://b.hatena.ne.jp/hotentry/it.rss'], ['エンタメ','http://b.hatena.ne.jp/hotentry/entertainment.rss'], ['アニメとゲーム','http://b.hatena.ne.jp/hotentry/game.rss'], ['おもしろ','http://b.hatena.ne.jp/hotentry/fun.rss'] ); foreach my $i (@list) { my $cont = get($i->[1]) || ""; print "$1\n" while ($cont =~ /rdf:li rdf:resource="(.+?)"/g); }
関連記事
- 「はてブでランダムジャンプ」を作ってみた[2008-10-08-1]
- リリースのお知らせ記事。2008年10月8日。