...
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 /,/;
...