• perl post模拟elasticsearch _mget


    ##发送消息
    use  LWP::UserAgent; 
    use LWP;
    use Encode;
    use LWP::Simple;
    use LWP::UserAgent;
    use HTTP::Cookies;
    use HTTP::Headers;
    use HTTP::Response;
    use Encode;
    use URI::Escape;
    use URI::URL;
    use JSON;
    use Data::Dumper;
      my $ua = LWP::UserAgent->new;
         $ua->agent("Mozilla/5.0 (Windows NT 6.1; rv:30.0) Gecko/20100101 Firefox/30.0");
      my $cookie_jar = HTTP::Cookies->new(
         file=>'lwp_cookies.txt',
         autosave=>1,
         ignore_discard=>1);
         $ua->cookie_jar($cookie_jar);  
       my $login_url ="http://10.10.17.2:9200/_mget/";  
       my $post =  {
        "docs" =>[
          {
          "_index" => "library",
          "_type"=>"books",
          "_id"=>1
           },
            {
          "_index" => "library",
          "_type"=>"books",
          "_id"=>2
           },
            {
          "_index" => "library",
          "_type"=>"books",
          "_id"=>3
           }
           ]
      };
        
        use JSON qw(encode_json);  
        $json_string = encode_json($post);  
      
        my $req = HTTP::Request->new(  
            'POST' => $login_url
        );  
        $req->referer("https://wx.qq.com/?&lang=zh_CN");  
        $req->content_type('application/json; charset=UTF-8')  
          ;    #post请求,如果有发送参数,必须要有这句  
        $req->content("$json_string");    #发送post的参数  
        my $res = $ua->request($req);  
        print $res->content();            #获取的是响应正文  
    
    
    
    D:elasticsearch api>perl post_mget_index.pl
    {"docs":[{"_index":"library","_type":"books","_id":"1","_version":1,"found":true
    ,"_source":{
      "title":"Elasticsearch test",
      "name" :{
        "first":"zhao",
        "last":"yangjian"
      },
      "publish_date":"2017-01-29",
      "price":"2421424.99"
      }
    },{"_index":"library","_type":"books","_id":"2","_version":1,"found":true,"_sour
    ce":{
      "title":"Elasticsearch test",
      "name" :{
        "first":"zhao",
        "last":"yangjian"
      },
      "publish_date":"2017-01-29",
      "price":"85245.99"
      }
    },{"_index":"library","_type":"books","_id":"3","_version":2,"found":true,"_sour
    ce":{
      "title":"Elasticsearch test",
      "name" :{
        "first":"zhao",
        "last":"yangjian"
      },
      "publish_date":"2017-01-29",
      "price":"23.99"
      }
    }]}
    D:elasticsearch api>
    
    

  • 相关阅读:
    【pytest学习10】fixture参数化,fixture(params=data)装饰器的data是函数返回值yield request.param ,将带到下面调用为参数的函数中
    Pipfile 文件转换利器——pipfile-freeze
    npm的lock
    调试wmi连接主机进行监控
    RPC电源监控总结
    HTTP协议三次握手过程
    linux常用命令集
    Gym
    Gym
    实验2.2
  • 原文地址:https://www.cnblogs.com/hzcya1995/p/13349896.html
Copyright © 2020-2023  润新知