Downloading YouTube Videos with a Perl One-Liner

You're viewing a comment by Saldane and its responses.

Saldane Permalink
July 27, 2007, 07:38

With some whitespace:

perl -MLWP -e '($y,$i) = shift =~ /^(.+m)\/.+v=(.+)/; ($m = LWP::UserAgent->new) ->get("$y/get_video?video_id=$i&t=" . ($m->get("$y/v/$i") ->request->uri =~ /&t=(.+)/)[0], ":content_file" => "$i.flv")'

Reply to this comment

Reply To This Comment

(why do I need your e-mail?)

(Your twitter name, if you have one. (I'm @pkrumins, btw.))

Comment Help

Type first 3 letters of your name: (just to make sure you're a human)

Please preview the comment before submitting to make sure it's OK.