Evaluated proc wiki name {strtop [preview http://en.wikipedia.org/wiki/[string totitle $name]] 40}