eval echo `perl -pe's%[^[]*(?=])%join",",$&=~/./g%e;y/()|[]/{},{}/;s%({[^}]*}|.)\?%{,$+}%g'`|tr \  \\n