Evaluated proc str2img args {regexp -inline {UpdateImage\("(.+?)"\)} [http post http://cooltext.com/PostChange "LogoID=1052217399&Text=$args"]}