メインサイト
 アイマス動画発掘サイト『ニコマスchガイド』

ニコニコ動画のアイドルマスター動画を独自のジャンルとキーワードで検索できる総合カタログサイトです。ログイン不要の再生にも対応。
ニコマス急上昇ワード

設置方法
NEW ENTRIES
CATEGORIES
拍手ボタンによるおススメ
ARCHIVES
LINKS
Calendar
Sun Mon Tue Wed Thu Fri Sat
   1234
567891011
12131415161718
19202122232425
2627282930  
<< November 2017 >>
PROFILE
OTHERS
 
ニコニコ動画にある”アイドルマスター”タグ付き動画に付けられたコメントを集計・加工してできた色々(powered by ニコマスchガイド)

<< 「2009年のアイマス動画「○○」と言えばこの動画!」終わった話その1 | main | ニコニコ動画アイマスドラマ作品ファインダーをリリースしました >>
ニコニコ動画のマイリストコメント抽出例


この動画を作った時にマイリストコメントを取得した方法を書いておきます。

ニコニコ動画の公開マイリスト検索(/openlist/sm****)は、AND検索もOR検索もNOT検索もできるっぽい - 超自己満足プログラミング ニコニコ動画の公開マイリスト検索(/openlist/sm****)は、AND検索もOR検索もNOT検索もできるっぽい - 超自己満足プログラミング

マイリストの一覧取得はこちらの情報を参考にさせていただきました。


.泪ぅ螢好箸琉賤を取得(最後のpageは必要なだけ増やす)
http://www.nicovideo.jp/openlist/sm8116732+OR+sm5623069+OR+sm8143857+OR+sm6858873+OR+sm7358788+OR+sm5681358+OR+sm5575802+OR+sm7655902+OR+sm8338855?sort=c&order=d&page=1

⊆萋世靴HTMLからマイリストのRSSURLを作成(Linuxの場合)
cat * | grep "mylist/[0-9]*¥">" | sed 's/.*¥(mylist¥/[0-9]*¥)">¥(.*¥)<¥/a>.*/http:¥/¥/www.nicovideo.jp¥/¥1?rss=2.0/' > mylisturl.txt

mylisturl.txtのRSSをダウンロード(ニコニコ動画へのログイン不要)

げ宍のperlスクリプトを使って取得したRSSフィードから必要な動画のコメントを抽出(要XML::RSSモジュール)
ls | perl rss.pl

そんな感じです。
ブログのレイアウトが盛大に崩れてますが、そんな感じです。

web拍手 by FC2他の人にもおすすめの記事だと思ったら押してください。左の記事ランクに反映されます。私信の送信にも使えます。
#!/usr/bin/perl
binmode(STDOUT, ":utf8");

use XML::RSS;
use POSIX 'strftime';

# XML::RSSを使う準備
my $rss = new XML::RSS;

foreach $line (<>) {

print $line;

eval {
if ($line =~ /rss/) {

# WEBから取得したデータを解析。
$rss->parsefile($line) or die "RSS file ERROR¥n";

# アイテムリストのリファレンス
my $item_list = $rss->{'items'};
# リストの各データを順に処理。
# 各データは、アイテム情報を保存したハッシュへのリファレンス
foreach my $item ( @{$item_list} ) {
# リファレンスから値を出力
if ($item->{'link'} =~ m@^http://www.nicovideo.jp/watch/(sm8116732|sm5623069|sm8143857|sm6858873|sm7358788|sm5681358|sm5575802|sm7655902|sm8338855)@) {
$vid = $1;
$memo = $item->{'description'};

if ($memo =~ /<p class="nico-memo">(.*?)<¥/p>/ms) {
$sql = $1;
$sql =~ s/¥r¥n//g;
$sql =~ s/¥n/<br>/g;
$sql =~ s/¥r/<br>/g;

print "$vid¥t$sql¥n";
}
}
}

}
}; if($@) { print "$@"; }

}
| 技術情報 | 22:15 | comments(0) | trackbacks(0) |









http://blog.nicomas.main.jp/trackback/1530476