my ($type,$id,$no,$date1,$text,$date2)=/()()()()()()/;