Для работы нужен ActivePerl

#!/usr/bin/perl -w

$text = 'Привет'; # слово которое хочешь вставить

open (FILE , "<out.txt"); # файл с текстом
chomp (@pars = <FILE>);
close FILE;

open (FILE2 , ">>pars.txt"); # в какой файл сохранить
while (@pars)
{
$spisok = shift @pars;
print FILE2 "$text $spisok\n";
}
close FILE2;