$dtdLine=~m/\((.*)\,|\,(.*)\)|\,(.*)\,/sg)