@chatroom_id来源

sub _get_chatroom{
    my $self  = shift;
    my @chatroom_id = @_;
    my $post = {
        BaseRequest =>  {
            Uin         =>  $self->wxuin,
            DeviceID    =>  $self->deviceid,
            Sid         =>  $self->wxsid,
            Skey        =>  $self->skey,
        },
        Count       =>  @chatroom_id+0,
        List        =>  [map { {UserName=>$_,ChatRoomId=>""} } @chatroom_id ],
    };
    print "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy
";
    print @chatroom_id;
    print "
";
    print "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy
";
	
	
	
	8880--yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy
@@247828a9b566a0f4c22a78d04cec84e52318d84ac537d82ba97ce76cf33fad2c

@@82ce890c84a406b69ed33da8e38769d32fefc5d658b73998f831c93b1a403808

@@b9445fb846074ff4d5e07bc3ed0966c5e65c6c913e9c399e56b666f067d0eb80

@@7c8ce876bc42aeb931eb660399cee6e6c71c5004b9b4b6e8016c5569c089d243

@@4c513eebba1b131a425a9c8f1ba4a00de7aeaedb2312bd4f486cdfb7938ab74d

@@13768e1c98f7edd01b9123b6658ae8268f682749e42f7c67718f861a8a986a74
8880--yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy

jrhmpt01:/root/pfwx-master/pfwx-master/demo# cat a2 | sort -u
                          'ChatRoomId' => '@@13768e1c98f7edd01b9123b6658ae8268f682749e42f7c67718f861a8a986a74',
                          'ChatRoomId' => '@@247828a9b566a0f4c22a78d04cec84e52318d84ac537d82ba97ce76cf33fad2c',
                          'ChatRoomId' => '@@4c513eebba1b131a425a9c8f1ba4a00de7aeaedb2312bd4f486cdfb7938ab74d',
                          'ChatRoomId' => '@@7c8ce876bc42aeb931eb660399cee6e6c71c5004b9b4b6e8016c5569c089d243',
                          'ChatRoomId' => '@@82ce890c84a406b69ed33da8e38769d32fefc5d658b73998f831c93b1a403808',
                          'ChatRoomId' => '@@b9445fb846074ff4d5e07bc3ed0966c5e65c6c913e9c399e56b666f067d0eb80',
						  
						  
						  
						   Count       =>  @chatroom_id+0,
        List        =>  [map { {UserName=>$_,ChatRoomId=>""} } @chatroom_id ],
		
		
		数据来源于init接口