Evaluated proc rpost {tid text} {regexp -inline {data-fullname=\"(.+?)\\} [http post http://www.reddit.com/api/comment "api_type=json&text=$text&thing_id=$tid&uh=[modhash]&reddit_session=[rcookie]" "Cookie reddit_session=[urlencode [rcookie]];Domain=www.reddit.com;Path=/;"]}