set data [eval ::PackageRepository::getFileViaHttp \ 
          [list $uri] [list 20] [list stdout] [list \ 
          [expr {!$verboseMetadataSubmit}]] $options] 
    } 
 
    set code [::PackageRepository::getLookupCodeFromData $data] 
    set result [::PackageRepository::getLookupResultFromData $data] 
    set code [::PackageRepository::getResponseCodeFromRawData $data] 
    set result [::PackageRepository::getResponseResultFromData $data] 
 
    if {[::PackageRepository::isLookupCodeOk $code]} then { 
    if {[::PackageRepository::isResponseCodeOk $code]} then { 
      return $result 
    } else { 
      error [appendArgs \ 
          "failed to submit package metadata: " $data] 
    }