#!/bin/rc sed '	s/[ 	]+$//	/	/!d	/, /{; h; s/,.*//; p; g; s/	.*, /	/; }' $1 |sed '	/\(/{; h; s/\([^)]+\)//; p; g; s/[()]//g; }' |sed '	s/	 +/	/	s/[ 	]+$//	s/  +/ /g'