<?php
// $path - путь к обрабатываемому каталогу (по умолчанию в папке скрипта).
class Fileread {
    public $files;    // массив файлов для обработки
    public $titletxt; // массив заголовков

    function __construct($path='') {
        if (!$path) {$path=getcwd();}
// забираем с каталога только html файлы
        $files=scandir($path);
        foreach($files as $a) {
            $pathinfo=pathinfo($a);
            if($pathinfo['extension']=='html') {
                $this->files[]=$a;
            }
        }
        $this->titletxt();
    }
// читаем в массив список titles из пользовательского файла
    public function titletxt() {
        $string=file('woland.txt') or die('no open file');
        $this->titletxt=array_unique($string);
        $this->readfile();
    }
// заменяем {title} на произвольную строку из файла woland.txt
    public function readfile() {
        foreach ($this->files as $a) {
            $string=file_get_contents($a) or die('no open files');
            $string=str_replace('{title}', $this->titletxt[array_rand($this->titletxt)], $string);
      $fd=fopen($a, 'r+t'); ftruncate($fd, 0); fseek($fd, 0, SEEK_SET); fclose($fd);
      file_put_contents($a, $string) or die('no write files');
        }
    }
}
?>

using System;
using System.Text;
using System.Text.RegularExpressions;
using System.IO;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            String[] t = File.ReadAllLines(args[1]);
            int l = t.Length - 1;
            int i = 0;
            foreach (String f in Directory.GetFiles(args[0],"*.html"))
            {
                String p = File.ReadAllText(f, Encoding.UTF8);
                p = Regex.Replace(p, "(?<=(<title>)).*?(?=(</title>))", t[i]);
                File.WriteAllText(f, p, Encoding.UTF8);
                i = (i < l) ? i + 1 : 0;
            }
        }
    }
}

C:\Windows\Microsoft.NET\Framework64\v4.0.30319\csc.exe /out:e:/hello.exe e:/hello.cs

C:\Windows\Microsoft.NET\Framework\v2.0.50727\csc.exe /out:e:/hello.exe e:/hello.cs

e:/hello.exe c:/путь/до/папки/с/хтмл c:/путь/до/файла/с/титлами.txt

param($d,$f)

$t=gc $f
$l=$t.Length-1
$i=0

ls $d "*.html"|%{
   sc $_.fullname ([Regex]::Replace([IO.File]::ReadAllText($_.fullname,[Text.Encoding]::UTF8),"(?<=(<title>)).*?(?=(</title>))",$t[$i])) -Encoding UTF8
   if($i -lt $l){$i+=1} else{$i=0}
}