Ich weiß nicht genau für was das zum Schluss gut sein soll, drum sag bescheid, wenn ichs falsch verstanen habe.

Du hast eine csv mit Zeilen. Jede Zeile erzeugt eine Zeile (Regex) Perlcode und dieser wird dann komplett in ein "richtiges" Programm kopiert, das die Ersetzungen macht.

Du kannst genauso gut die Zeilen der csv-Datei in das richtige Programm kopieren in ein my @array = qw(Whitespace-gesplittete-liste)
Das Array dann durchlaufen und die Ersetzung machen.