x = c('Kält', 'normal', 'normal with, punctuation ~-+!', 'normal with number 1234')
grep(pattern = "[^[:ascii:]]", x, perl=TRUE)
grep(pattern = "[^[:ascii:]]", x, value=TRUE, perl=TRUE)
eCA9IGMoJ0vDg8KkbHQnLCAnbm9ybWFsJywgJ25vcm1hbCB3aXRoLCBwdW5jdHVhdGlvbiB+LSshJywgJ25vcm1hbCB3aXRoIG51bWJlciAxMjM0JykKZ3JlcChwYXR0ZXJuID0gIlteWzphc2NpaTpdXSIsIHgsIHBlcmw9VFJVRSkgCmdyZXAocGF0dGVybiA9ICJbXls6YXNjaWk6XV0iLCB4LCB2YWx1ZT1UUlVFLCBwZXJsPVRSVUUpIA==