@ds_search = grep(/^(??{substr($tablename, 0, 5)})/, @{$ref_new_table_par->[3]});