diff --git a/mxproxmox/mxproxmox b/mxproxmox/mxproxmox
index 57c0b40..0a81bf7 100755
--- a/mxproxmox/mxproxmox
+++ b/mxproxmox/mxproxmox
@@ -37,7 +37,6 @@ sub read_cred_file {
     chomp($PBS_PASSWORD);
     $ENV{'PBS_PASSWORD'} = $PBS_PASSWORD;
 }
-read_cred_file();
 
 my $hostname = `hostname -s`;chomp $hostname;
 
@@ -77,8 +76,11 @@ sub do_map {
     return (@out);
 }
 
-my $ua = new LWP::UserAgent( ssl_opts => { verify_hostname => 0 } );
-$ua->default_header( Authorization => 'PBSAPIToken mariux64@pbs!backup:'.$PBS_PASSWORD );
+our $ua;
+sub init_ua {
+    $ua = new LWP::UserAgent( ssl_opts => { verify_hostname => 0 } );
+    $ua->default_header( Authorization => 'PBSAPIToken mariux64@pbs!backup:'.$PBS_PASSWORD );
+}
 
 sub get {
     my ($path) = @_;
@@ -266,6 +268,9 @@ sub cmd_tclient {
     sys(@cmd);
 }
 
+read_cred_file();
+init_ua();
+
 @ARGV >= 1 or die USAGE;
 my ($cmd,@rest) = shift;
 if ($cmd eq 'test') {