Evaluated proc youtube_title id {. "\x02Title:\x02 [last [regexp -inline {'text'>(.+?)</title>} [unescape_html_entities [wget http://gdata.youtube.com/feeds/api/videos/$id]]]]" [^C]14\[[ytvidlen $id]]}