<?php // By WHK.
$titulo = 'Nuevo titulo';
$archivo = 'index.html';
 
if(!$abrir = @fopen($archivo, 'r')){
 die('Error al abrir el archivo '.htmlspecialchars($archivo, ENT_QUOTES));
}else{
 $contenido = fread($abrir, filesize($archivo));
 fclose($abrir);
}
 
$contenido = explode('<title>', $contenido);
$inicio = $contenido[0];
$contenido = explode('</title>', $contenido[1]);
$termino = $contenido[1];
$buffer = "{$inicio}<title>{$titulo}</title>{$termino}";
copy($archivo, "{$archivo}.bkp");
unlink($archivo);
if(!$guardar = @fopen($archivo, 'a')){
 die('El archivo '.htmlspecialchars($archivo, ENT_QUOTES).' no pudo ser guardado.');
}else{
 fwrite($guardar, $contents);
 fclose($guardar);
}
die("Archivo modificado con &eacute;xito!");
?>