#!perl -lp
s//,/g;s/,(\S+), */{$1}/g;$_="@{[glob]}"