« 2008年3月 | メイン

2008年8月 アーカイブ

2008年8月30日

plagger/assets/plugins/Filter-FindEnclosures/youtube_mp4.pl

試してないけど、これで動きそう

yusuke@vmware:~/work/plagger/svn/plagger/assets/plugins/Filter-FindEnclosures$ diff -u youtube.pl youtube_mp4.pl
--- youtube.pl  2008-08-30 22:52:56.000000000 +0900
+++ youtube_mp4.pl      2008-08-30 23:02:47.000000000 +0900
@@ -27,9 +27,9 @@

     if ($args->{content} =~ /video_id=([^&]+)&l=\d+&t=([^&]+)/gms){
         my $enclosure = Plagger::Enclosure->new;
-        $enclosure->url("http://youtube.com/get_video?video_id=$1&t=$2");
-        $enclosure->type('video/flv');
-        $enclosure->filename("$1.flv");
+        $enclosure->url("http://www.youtube.com/get_video?video_id=$1&t=$2&fmt=18");
+        $enclosure->type('video/mp4');
+        $enclosure->filename("$1.mp4");
         return $enclosure;
     }

2008年8月31日

youtube.pl (FindEnclosure)

plagger の trunk のやつじゃ動かなくなってた

yusuke@app:~/lib/plagger/assets/plugins/Filter-FindEnclosures$ svn diff
Index: youtube.pl
===================================================================
--- youtube.pl  (リビジョン 2041)
+++ youtube.pl  (作業コピー)
@@ -25,7 +25,7 @@
             $args->{content} = decode_content($res);
         }

-    if ($args->{content} =~ /video_id=([^&]+)&l=\d+&t=([^&]+)/gms){
+    if ($args->{content} =~ /video_id=([^&]+)&.+?&t=([^&]+)/gms){
         my $enclosure = Plagger::Enclosure->new;
         $enclosure->url("http://youtube.com/get_video?video_id=$1&t=$2");
         $enclosure->type('video/flv');

codereposに置いた

http://coderepos.org/share/browser/lang/perl/plagger/assets/plugins/Filter-FindEnclosures/youtube_mp4.pl

About 2008年8月

2008年8月にブログ「Yusukebe::Tech」に投稿されたすべてのエントリーです。過去のものから新しいものへ順番に並んでいます。

前のアーカイブは2008年3月です。

他にも多くのエントリーがあります。メインページアーカイブページも見てください。


ブログSEO対策:track word seo