- or download this
my $filename = "";
$filename = $hash{"LIS_FILE"} if($node eq "sam");
...
$mail_server_name = $hash{"MAIL_SERVER"} if($node eq "sam");
$mail_server_name = $hash{"MAIL_SERVER_TEST"} if($node eq "cad2");
chomp $mail_server_name;
- or download this
my $postfix = '';
if ( $node eq 'cad2' ) {
...
mail_server_name =>
$hash{"MAIL_SERVER${postfix}"}
};
- or download this
my ($filename, $htmfilename,
$sqt_path, $database_name,
...
$$store = $hash{"${attr}${postfix}"};
}
- or download this
my ($filename, $htmfilename,
$sqt_path, $database_name,
...
die "Missing required config data: ${attr}${postfix}";
}
}