$response =~s/[{:,]\K(\w+)(?=[:,}])/"$1"/g;