$foo = ':{"' $foo =~ s/([:,{])(.)/$1 $2/g;