YouTube Data APIの続き
先日(id:clouder:20080121:1200907843)書いたYouTube Data APIですが、結局モジュールは使わず以下のように、XML::Atom::Feedで取ってごにょっとやることにしました。一番これが楽でした、はい。
ちなみに以下はのは$ARGV[0]にvideo_idを入れてやると、その動画のタイトルを出力してくるというものです。
use strict; use XML::Atom::Feed; my $entry = XML::Atom::Entry->new( sprintf( 'http://gdata.youtube.com/feeds/api/videos/%s', $ARGV[0] ) ); my ( $title ) = $entry->elem->getElementsByTagName( 'media:title' ); warn $title->textContent;