case 'put' :
    $opts[CURLOPT_PUT] = TRUE;
    if (strlen($req_body)) {
        $buf = tmpfile();
        fwrite($buf, $req_body);
        fseek($buf, 0);
        $opts[CURLOPT_INFILE] = $buf;
        $opts[CURLOPT_INFILESIZE] = strlen($req_body);
    }
    break;