my $ua = LWP::UserAgent->new( ssl_opts => { verify_hostname => 0 }, );
$ua->timeout('1000'); 

sub getUserInfo {
  my($userId) = @_;
my $partnerId = 'B53765B23456678C1'
 my $userURI = 'https://xxx.com/api/m1/request/'. $partnerId. '/users/'. $userId;   
 print $userURI, "\n";
 #sleep (3);    
 my $userResponse = $ua -> request(GET($userURI, Authorization => $authHeaders)); # I am getting a token which is passed in the header.
   if ($userResponse->is_success) {
      my $userRecord =  decode_json($userResponse->content); 
      print $userResponse->status_line, "\n";
      return ($userRecord);
        }
     else {
    displayMsg ( "No user Records to process....................");
    print $userResponse->status_line, "\n";
    print $userResponse->decoded_content, "\n";
    error ("Error: ", $userResponse->status_line, " " , $userResponse->decoded_content);
    exit 1;
    }     
      }