Help for this page

Select Code to Download


  1. 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;
    
  2. or download this
    my $postfix = '';
    if ( $node eq 'cad2' ) {
    ...
                   mail_server_name => 
                        $hash{"MAIL_SERVER${postfix}"}
                    };
    
  3. or download this
    my ($filename, $htmfilename, 
        $sqt_path, $database_name, 
    ...
        $$store = $hash{"${attr}${postfix}"};
    
    }
    
  4. or download this
    my ($filename, $htmfilename, 
        $sqt_path, $database_name, 
    ...
            die "Missing required config data: ${attr}${postfix}";
        }
    }