if ($args{user} || $args{password}) { 
      use MIME::Base64;
      $tkxf_auth='Authorization: Basic '.encode_base64($args{user}.':'.$args{password},''); 
      }

##</code><code>##

use MIME::Base64;
my $headers = {
                  Accept => "application/json",
                  'Content-Type' => "application/json",
                  Authorization => 'Authorization: Basic '.encode_base64($args{user}.':'.$args{password},'')
              };