$s=~s/(?<=\S)(?=[[:upper:]])/ /g