package require TclCurl

curl::transfer -url 127.0.0.1 -header 1 -nobody 1 \
        -writeheader header.txt