Evaluated proc .ga_ domain { set result [http get http://admin.my.ga/registration/registerpaid?domainname=[regsub {\.*ga$} $domain {}].ga "Referer: http://admin.my.ga/registration/registerpaid?domainname=oeuoeuoe.ga"]; regsub {\.*ga$} $domain {} }