perl -p -e '
s/\(\S+//g;
s/\)//g;
s/(PUNC \.)/${1}\n/g;
s/(?:\*T\*)|(?:\*0\*)|(?:\*ICH\*)|(?:\W\*\W)|(?:-RRB-)|(?:-LRB-)//g;
s/\s{2,}/ /g;
'

