col1 = c( "name.surname", "name.surname", "name.surname")
df <- as.data.frame( col1 )
gsub(".", "\r", df$col1, fixed=TRUE)
cat(gsub(".", "\r", df$col1, fixed=TRUE), collapse="\n")
Y29sMSA9IGMoICJuYW1lLnN1cm5hbWUiLCAibmFtZS5zdXJuYW1lIiwgIm5hbWUuc3VybmFtZSIpCmRmIDwtIGFzLmRhdGEuZnJhbWUoIGNvbDEgKQpnc3ViKCIuIiwgIlxyIiwgZGYkY29sMSwgZml4ZWQ9VFJVRSkKY2F0KGdzdWIoIi4iLCAiXHIiLCBkZiRjb2wxLCBmaXhlZD1UUlVFKSwgY29sbGFwc2U9IlxuIik=