$string =~ s/([A-Z])/ $1/g;