Support so* videos

miyagawa · Mar 26, 2010 · 641c68a · 641c68a
1 parent edc4f1f
commit 641c68a
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/lib/WWW/NicoVideo/Download.pm b/lib/WWW/NicoVideo/Download.pm
@@ -41,6 +41,12 @@ sub prepare_download {
         $self->login($video_id);
     }
 
+    if ($video_id =~ m/so\d+/){
+	my $u = $res->request->uri->as_string;
+	$u =~ m|.+/([^?]+)|;
+	$video_id = $1;
+    }
+
     my $time = scalar time;
     $res = $ua->get("http://flapi.nicovideo.jp/api/getflv?v=$video_id&ts=$time&as3=1");
     if ($res->is_error) {