If you want to download videos from YouTube

Hello,

Here it is a short program that downloads a specified video from YouTube:

use WebService::YouTube::Util;
use File::Slurp;

my $url = shift || 'http://youtube.com/?v=Plvx8hjgLVc';

$url =~ s|^http://youtube\.com/\?v=||;
my $content = WebService::YouTube::Util->get_video($url);
write_file("$url.flv", {binmode => ':raw'}, \$content);

HTH.

Octavian

__________
View the list's information and change your settings at http://www.freelists.org/list/programmingblind

Other related posts: