<?
    $base_url=$argv[1]."test.txt";
    $curl=curl_init($base_url);
    $ret=curl_setopt_array($curl,array(CURLOPT_RETURNTRANSFER=>true,CURLOPT_BINARYTRANSFER=>true,CURLOPT_VERBOSE=>false));
    if($ret===FALSE) {
        printf("cURL error: '%s'",curl_error($curl));
        exit;
    }

    $buf="deadbeef1337";
    //write buffer to tempfile
    $tmp=tmpfile();
    if($tmp===false) {
        printf("tmpfile failed\n");
        exit;
    }
    fwrite($tmp,$buf);
    fseek($tmp,0);

    $ret=curl_setopt_array($curl,array(
        CURLOPT_URL=>$base_url,
        CURLOPT_INFILE=>$tmp,
        CURLOPT_INFILESIZE=>strlen($buf),
        CURLOPT_PUT=>true
    ));
    if($ret===FALSE) {
        printf("cURL error: '%s'",curl_error($curl));
        exit;
    }

    printf("Requesting cURL PUT to '%s' for %d bytes\n",$base_url,strlen($buf));

    $ret=curl_exec($curl);

    if($ret===FALSE) {
        printf("cURL error: '%s'\n",curl_error($curl));
        exit;
    }

    fclose($tmp);

    $ret=curl_setopt_array($curl,array(
        CURLOPT_URL=>$base_url,
        //          CURLOPT_INFILE=>NULL,
        CURLOPT_INFILESIZE=>0,
        CURLOPT_PUT=>false
    ));
    if($ret===FALSE) {
        printf("cURL error: '%s'",curl_error($curl));
        exit;
    }

    printf("Requesting cURL GET from '%s'\n",$base_url);

    $ret=curl_exec($curl);

    if($ret===FALSE) {
        printf("cURL error: '%s'\n",curl_error($curl));
        exit;
    } else
        printf("Raw data: %s\n",$ret);

?>