#!perl -lp
s/\B/,/g;s/ /}{/;$_=join$",<{$_}>