Evaluated proc wikipic name { last [regexp -inline {<div class="magnify">.+?<img .*src="(.+?)"} [wget http://en.wikipedia.org/wiki/[string totitle $name]]] }