# http://www.fooooo.com/list.php?genre=0
sub init {
my $self = shift;
$self->{domain} = "fooooo.com";
$self->{handle} = ".";
}
sub needs_content { 1 }
sub find {
my ($self, $args) = @_;
my $url;
my $enclosure = Plagger::Enclosure->new;
if($args->{content} =~ qr|www.youtube.com/v/|) {
($url) = $args->{content} =~ /value="(.+?)" name="movie"/;
}
elsif($args->{content} =~ qr|www.veoh.com/videos/|) {
my ($permalinkid) = $args->{content} =~ /permalinkId=(\w+)/;
$url = "http://www.veoh.com/videodetails2.swf?permalinkId=$permalinkid&id=anonymous&player=videodetailsembedded&videoAutoPlay=1";
}
elsif($args->{content} =~ qr|www.nicovideo.jp/watch|) {
my ($id) = $args->{content} =~ /\/watch\/(\w+)/;
$url = "http://ext.nicovideo.jp/thumb_watch/$id";
}
elsif($args->{content} =~ qr|dailymotion.com/swf/|) {
($url) = $args->{content} =~ /<embed src="(.+?)"/;
}
elsif($args->{content} =~ qr|vision.ameba.jp/watch.do|) {
#my($id, $jpg) = $args->{content} =~ m!Paste\.init\('\d+','(.*?)','(http://.*?\.jpg)'\)!; # iframe
#$url = "http://vm1-1.vision.ameba.jp/mcb.swf?id=$id&width=590&height=510";
}
elsif($args->{content} =~ qr|videocast.yahoo.co.jp/player/|) {
($url) = $args->{content} =~ /<embed src="(.+?)"/;
}
elsif($args->{content} =~ qr|video.fc2.com/flv2.swf|) {
($url) = $args->{content} =~ /<embed src="(.+?)"/;
$enclosure->width(424);
$enclosure->height(360);
}
elsif($args->{content} =~ qr|<!--Start iframe -->|) { #(youtube,veoh)埋め込み無効分
($url) = $args->{content} =~ /<iframe src="(.+?)"/;
}
$enclosure->url("$url");
$enclosure->type('application/x-shockwave-flash');
return $enclosure;
}
最終更新:2009年01月17日 21:51