if ( ( -d $name ) && ( exists $name_map->{$name} ) ) {
            #print $name;
            my $new_name = $name_map->{$name};
           # print $new_name; 
            rename_file_or_dir( $name, $new_name );
            $name = $new_name;            
            #print $name;
        }
        
        elsif ( -f $name ) {
            if (( my $base_name = $name) =~ s/\.config$// ) {
                if ( $name_map->{$base_name} ) {
                    my $new_name = $name_map->{$base_name} . '.config';
                  #  print $new_name;
                    rename_file_or_dir( $name, $new_name );
                    change_file( $mapfile, $name_map, $regex );
                }