substring por la derecha

[Albertron]

Hola,

Alguien sabe como hacer un substring eliminando la última palabra?
He probado con una función que me lo hace pero me da problemas con los acentos, cursivas, ...

Me gustaría algo como esto:

$origen = "esto es un ejemplo de substring en una fra";
$destino = "esto esto es un ejemplo de substring en una";

Muchas gracias,