my %hash_for_db_connect = ("companyname " => "contactnames", "contactname" => "contactnames", "title" => "contactnames");

##</code><code>##

my %hash_for_db_connect = (companyname => "contactnames", contactname => "contactnames", title => "contactnames");

##</code><code>##

...
foreach (@module_file_lines){
  print $test_build_file_handle $_;
}
my @forms_required = ("createnewcid", "customerform");
my @child_node_values_fill;
my $locatory_fields_id;
my $locator_type;
my $event_type;
my $data_fill;

my %hash_for_db_connect = ("companyname " => "contactnames", "contactname" => "contactnames", "title" => "contactnames");
foreach my $config_forms (@forms_required) {
@child_node_values_fill = get_child_node_value($config_forms);
        foreach (@child_node_values_fill) {
                ($locatory_fields_id, $locator_type, $event_type, $data_fill) = split (/,/, $_);
...

##</code><code>##

...
print $test_build_file_handle $_ for @module_file_lines;

my %hash_for_db_connect = (companyname => 'contactnames', contactname => 'contactnames', title => 'contactnames');

for my $config_forms (qw( createnewcid customerform )) {
    for (get_child_node_value($config_forms)) {
        my ($locatory_fields_id, $locator_type, $event_type, $data_fill) = split /,/;
...