print "\$var is ->$var<-\t\$value is ->$value<-\n"; #### $value = $env_var{$1} . $value;