名前とカンマだけ切り出す正規表現

CREATE TABLE文からSELECT文を作ろうとして、カラムの定義情報から正規表現で名前とカンマだけ持ってこようと思ったら、おもいのほかてこづったのでメモ。
ちなみに環境はサクラエディタ＋bregonig.dll Ver.1.21 with Oniguruma 5.5.2です。

before

	AAAA INTEGER NOT NULL PRIMARY KEY,
	BBB CHAR(10) NOT NULL,
	CC BYTEINT,
	DDD DECIMAL(18,0) NOT NULL,
	EEEEE DECIMAL(15,1)

↓
after

	AAAA,
	BBB,
	CC,
	DDD,
	EEEEE

結局、s/ .+((,)|[^,])\r\n/$2\r\n/ で何とかなったんですが、同僚に相談したところ、 s/ .+[A-Z)]// で出来るじゃん、という話に。
確かにそっちの方が楽そう。

とりあえず、こんな手遊びみたいな問題とはいえ、性格が出るもんですね。