#!perl -p
s/\s//g,s/,w/, w/,s/ob/o b/,s/sb/s b/,s/sB/s B/g