my @body_list = (grant => 'client_credentials',
                      partner => ‘dfjkdjfdkdjkdkdjfdk’,
                      client =>  'dkfjdlfjdlfkjlj',
                      client => 'dfkljflsfjlajflafjlsdkfjdskl=',  # need encoding that is = will be %3D
                    );     
my $bodyData=substr($restClient->buildQuery(\@body_list),1);