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

Saldane Permalink
July 27, 2007, 07:34

All of the methods you used from WWW::Mechanize were inherited from LWP...

Here's a first go at a golf, very similar to yours:

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")'
'http://www.youtube.com/watch?v=l69Vi5IDc0g'

Reply To This Comment

(why do I need your e-mail?)

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

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.