my @myheaders; 
  my $curl = WWW::Curl::Easy->new;
  $curl->setopt(CURLOPT_HTTPHEADER,\@myheaders);
  # That should have wiped out the default header assumptions that include
  # Expect: 100-continue --which we don't want

  ### Do the rest of the header stuff via setopt:
  $curl->setopt(CURLOPT_URL,${uri});