my $filename = "";
$filename = $hash{"LIS_FILE"}      if ( $node eq "sam" );
$filename = $hash{"LIS_FILE_TEST"} if ( $node eq "cad2" );
chomp $filename;
my $htmfilename = "";
$htmfilename = $hash{"HTM_FILE"}      if ( $node eq "sam" );
$htmfilename = $hash{"HTM_FILE_TEST"} if ( $node eq "cad2" );
chomp $htmfilename;
my $sqt_path = "";
$sqt_path = $hash{"SQT_PATH"}      if ( $node eq "sam" );
$sqt_path = $hash{"SQT_PATH_TEST"} if ( $node eq "cad2" );
chomp $sqt_path;
my $database_name = "";
$database_name = $hash{"DB_NAME"}      if ( $node eq "sam" );
$database_name = $hash{"DB_NAME_TEST"} if ( $node eq "cad2" );
chop $database_name;

my $mail_server_name = "";
$mail_server_name = $hash{"MAIL_SERVER"}      if ( $node eq "sam" );
$mail_server_name = $hash{"MAIL_SERVER_TEST"} if ( $node eq "cad2" );