4VVBCVPDQCKMBD5O5QRYXVV7JL5ULRMXIG23JNTDVSLB2YCH4EPAC die 'SoTest username and password must be specified'unless ( defined $sotest->{username} and defined $sotest->{password} );
die 'SoTest authfile is not specified'unless ( defined $sotest->{authfile} );open( my $authfile, "<", $sotest->{authfile} )or die "Cannot open Sotest authfile \${\$sotest->{authfile}}";close($authfile);
_logIfDebug 'post job for ', $sotest_name;
my $authfile;open( $authfile, "<", $sotest->{authfile} )or die "Cannot open Sotest authfile \${\$sotest->{authfile}}";while (<$authfile>) {if ( $_ =~ /(.+):(.+)/m ) {$sotest_username = $1;$sotest_password = $2;}}close($authfile);die "failed to parse username and password from ${\$sotest->{authfile}}"unless ( defined $sotest_username and defined $sotest_password );_logIfDebug "post job for $sotest_name";