Creo que tu problema con la validación. Cuando haces esto:
if (strstr($lines[$l],"
$titulo=")) {
La variable es sustituida por su valor, entiendo tu buscas la cadena $titulo (con todo y $). Entonces, tendrías que escaparlo con una diagonal invertida (\$) para que forme parte de la cadena o manejar comillas simples ('$titulo=') donde las variables no son interpretadas.
Suerte
