print $_,$/ for map split(',',$_), split(':', $str);