DB<1> $foo = ':{"';

  DB<2> $foo =~ s/([:,{])/$1 /g;

  DB<3> print $foo
: { "