push @Customer_list, $line =~ m/{(.*?)}/g;