
Professional Approach(to come)
Simple ApproachHere is the simplest solution with no error checking and no extensive use of packages. (A more professional version - to come - would use an XML package and provide error checking and a million options.Note - this is ONLY to be used by non-profit purposes. See the http://geocoder.us

# comment out next line to read from command line set argv "100 Bureau Dr, Gaithersburg, MD 20899" regsub -all " " $argv "+" encodedURL set geocoder "http://rpc.geocoder.us/service/rest/geocode?address=$encodedURL" set data [http::data [http::geturl $geocoder]] regexp "<geo:long>(.*)</geo:long>" $data X long regexp "<geo:lat>(.*)</geo:lat>" $data X lat puts "long: $long" puts "lat : $lat"