#!perl -pl s/\B/,/g;s/ /}{/;$_="@{[<{$_}>]}"