last.fmをPodcasting

時間が出来たらPlagger+Last.fmやってみたいなぁと思っているんだが、とりあえずMP3::Podcastを使ってうまくいくか試してみた。

last.fm-ripper使うと指定したディレクトリにmp3がたまるので、MP3::Podcastで連携しやすい。

#!/usr/bin/perl

use MP3::Podcast;
use strict;
use warnings;

my $dirname = "[MusicDIR]";
my $urlbase = "http://[URL]";
my $dir = "/";

my $pod = MP3::Podcast->new($dirname,$urlbase);
my $rss = $pod->podcast($dir,"kerolincast");
print $rss->as_string;

kerolincast

なかなか快適な感じです。

あと、かま田さんとこで知ったんですが、はてなブックマークにmp3が登録できるようになったそうなんで、Plagger::Plugin::Publish::PodCastを利用すれば、かまックマーク->かまックキャストとか、、、つまり、Plagger使ってはてなブックマークでPodcastingできるかなとか思ったヨ。

でもlengthどうやってゲットするのがいいのかな?

というか、はてなにアカウント作ろうか、、、、

Exit Music:Songs With Radio Heads

レディオヘッドのカバー、Matthew HerbertとかCinematic Orchestraのカバーが気になる。

ProductName Exit Music: Songs for Radio Heads
Various Artists
Rapster / 2097円 ( 2006-04-08 )


早速予約。

コメントの

改行が変だ。

あとでナオス。

Perl Best Practices届いた

Perl Best Practices届いたので読む。

ProductName Perl Best Practices
Damian Conway
Oreilly & Associates Inc / 3034円 ( 2005-08 )


サイン本うらやましいっす。

麺匠 呉屋

潤という新潟ラーメンの店にいったら、改装中で休み。向かいにあった店にはいった。汐ラーメン。

呉屋 汐ラーメン

フライパンで焦げ目をつけた豚トロっぽいのがいい感じだったが、全体的にあっさりというか塩がたっていた感じが。

Catalyst::Plugin::TagCloud

この前書いたのイマイチ かつYAPCのCatalyst話参考になったので、早速書き直してみた。

__PACKAGE__->config(
        tagcloud =>{
                levels => 10,
                limit => 3
                }
);

な感じでレベルとリミット設定できるようにした。

でも、実際に使ってみると、

sub default : Private {
    my ( $self, $c ) = @_;

my $tags = [
        {tag=>"tag1",url=>"url1",count=>5},
        {tag=>"tag2",url=>"url2",count=>15},
        {tag=>"tag3",url=>"url3",count=>8},
        {tag=>"tag4",url=>"url4",count=>20},
        {tag=>"tag5",url=>"url5",count=>3}];

my $html = $c->create_tagcloud($tags,"html_and_css");
    # Hello World
    $c->response->body( $html );
}

みたいに配列のリファレンスを用意しないといけないのが駄目ゲ?セーフゲ?わからん。

  • testとか書いてない(今後覚える、というかやる)
  • blahが多い(blur派だからしょうがない?)
  • Module::Starterつかうべしなのにh2xsではじめてしまった。

な感じで、やりかけだけど、ココから落とせます。もっと、小洒落たやりかたがあれば指摘してもらえると助かります。

YAPC行ってきたヨ (2)

楽だ

XSの話とCatalyst関連の話題が面白かった。XSのサンプルは後でいじってみる。科学技術計算系のゴリゴリやるやつはやっぱCとか書けるようにしといたほうが幅が出ていいのかナァなんて思っているのでこれをきっかけに少し頑張ってみるかな。

Catalystは最近プラグインつくってみたかったりするので今日の話はなるほどなところが多くて参考になった。

Larry WallのKeynoteは面白かったが、深すぎてついていけないところが多々あった。

ヤップク

そして、気になるといえばYAPC::Asia 2006 Tokyoも気になる。面子が、、、、

豪華すぎ

とってもとっても行きたいが平日なんだよね。

でYAPCの読みなんだけど、「ヤップクニセンロク」って勝手によんでるんだけどホントはどう読むのが正しいのだろか?

追記060330

ヤップシーって読むそうです。

  • × ヤップク
  • ○ ヤップシー

あとKwikiをケーウィキとよんでたんだけどクウィキって読むみたい。

YAPC行ってきたヨ

今日明日と仕事を放棄してYAPC行ってます。面子がね、やっぱヤバイし、実際中身も濃かったヨ。

YAPC2006

色々メモッたけど、をを!と思ったのが、mixiってLAMPなのねってことと、高橋メソッドのプレゼンって、目にくるねということと、ダミアンの話は凄く面白くて、特に印象に残ったのはモジュールはh2xsでなくModule::Starter つかって書き始めましょうと正規表現にはxmsつけましょうって話

あとで試してみよう。

Larry Wallのサイン入りラクダ本はあったけど、Damian Conwayサイン入りベストプラクティス本はなかった。

ProductName Perl Best Practices
Damian Conway
Oreilly & Associates Inc / 3034円 ( 2005-08 )


Amazonで早速購入した。

今日の桜

sakura030628

もうちょい。でも今夜は雨だからなぁ。