Select Code to Download

#!/usr/bin/perl
open FH, "master.cfg" or die $!;
...
$hash1{$key} = $value;
open FH1, ">config1_new.cfg" or die $!;
if ($value1 != $value)

[root@localhost test]# cat master.cfg
env=qa
...
env_var3=x
env_var4=y
Var=conf

variavle=value
env_var2=val2
env_var1=val1