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