Como abreviar linha de strings com um delimitador de vários caracteres?

concat(left(name, 1), '.', substring(name, locate('^*^', name) + 3, 1), '.')

update mytable
set name = concat(left(name, 1), '.', substring(name, locate('^*^', name) + 3, 1), '.')