All Blue

Drum & Bass Arenaで一位になってたAll Blueがなかなかよい。

magnetosphereかっこいい

magnetosphereというiTunes用のビジュアライザーがかっこよい。

論文情報ポッドキャスティング

錬金術師の苦悩 - ひさしぶりの投稿

最近は、いろいろなjounalでPodcastの配信を始めているので、通勤のお供や、英語の勉強に最適です。

Natureとか医学系論文はポッドキャストしてるんだ、、、、知らんかった。早速通勤で聴こう

J.C.I.Mとかもポッドキャスティングしてくれんかな。

last.fm_mp3のアーティストとかアルバムの情報をiTunesに放り込む

なかば唐突に話をはじめるが、last.fmのmp3のバージョンのタグは

 'TAGVERSION' => 'ID3v1 / ID3v2.3.0',

となっているようで、タグはきちんと埋め込まれてるのに関わらず、iTunesで読ませると、アーティストとかアルバムの情報がきちんと抽出されない。

毎回手を動かしてプロパティいじるのもあれなので調べたところ、ID3v2のタグをremoveすればとりあえずはOKらしい。

use DirHandle;

$d = new DirHandle ".";
while ($file = $d->read){
    remove_mp3tag($file,2) if $file =~ /.mp3$/;
}

MP3からアートワークを抽出する

NamingSense::TokuLog! - アートワークを Perl で設定するの法

MP3::Tag を使ってこんな風にやると、とりあえずアートワークを設定できることを確認。

と、MP3にアートワークを埋め込む方法があったので、逆にMP3からアートワークを抽出するにはどうすんだろうか?

とか思ったので調べてみたところ、MP3::Infoを使えば、$x->{APIC}->{DATA}にバイナリが入っているのでそれをプリントすればいい。

#!/usr/bin/perl

use MP3::Info;

my $file = shift;
my $x = get_mp3tag($file, 2, 2); 
print $x->{APIC}->{DATA};

このコードだと、バイナリがjpgかどうかわからんので、$x->{APIC}->{FORMAT}みてファイル形式チェックしないとあかん。

last.fmポッドキャスティングするときにアートワークがジャケである必要ないから、なんか曲にマッチした画像を自動で選んで突っ込めないもんかな。

MP3の波形とイメージの波形Image::Seekうまく相関させられるといいのか?

それか、もちっとバイナリで計算しやすそうなflickrのタグとかfingerprintにしたのと、last.fmのタグをfingerprintにしたもののマッチでも面白そうなんだけど。

HOT! HOT! - CO-FUSION

今週のiTMSのフリーダウンロードはHOT! HOT!なので早速落として聴いてます。こういったベタな曲も好きだ。まぁ、なんつーかわかりやすい。

で、ジョンつながりというか、強引にもっていきますが、朝霧にSURGEONきやがりますな。 強がってイカネーヨとか言ってはみたもののちょっと後悔したかも。でも追加駐車券が本栖湖はナイだろうに。

SURGEONだけだったら強がってられたけど、smith & Mightyと琉球ディスコもくるもんなぁ。

まぁ、みんな楽しんできてくださいってことで。でも最近結構寒くナってきてるヨ。