if ($line =~ m/{(.*?)}/g) {
	$customer_name = $1;
	push (@Customer_List, $customer_name);