split che non e' la strada giusta

[Mutato]

Ho questo:

$line = "Ciao __mutato__ abcd"; # funziona
#$line = "Ciao __nomine__ abcd __mutato__ abcd"; #non funziona

$ul     = split("__",$line);
$line = $ul[0]."<u>".$ul[1]."</u>".$ul[2]; 

Se si sostituisce la seconda $line la stringa non funziona piu'... non riesco a scrivere una espressione corretta per sostituire quei caratteri se ci sono piu' di due __ per linea.

Ho anche cercato di cavarmela con un ciclo for, ma niente...