http - 带有 curl 代码 400 的 tcl

Question

使用 tcl 循环 curl linux 命令时，我遇到了问题：

for {set i 0} {$i<20} {incr i} {
   if {[catch {set x [exec curl -x 192.168.254.1:8081 -w "%{http_code}" "http://www.playboy.com"]} y]} {
            puts "$y"
   } else {
            puts "$x"
   }
}

我希望收到一个 403 http 代码，但有时它可以工作并且它会给出 403 代码，但有时它会给出我没想到的 400 代码。Http 代码 400 用于错误请求，因为语法格式错误。

任何人都知道为什么以及如何解决这个问题？