Как мне ... как добавить строку к каждой строке с помощью Perl?

---

Как я могу добавить строку к каждой строке внутри текстового файла с помощью perl?

Вход file:t.txt
используйте строгий
используйте предупреждения

выходные данные:

используйте строгий
используйте предупреждения
струна

Ожидаемый результат:

использовать строгие строка
использование предупреждений строка

Что я уже пробовал:

<pre> #!/usr/local/bin/perl
   open OUT,">>","t.txt" or die "error";
   #chomp(OUT);
   print OUT "aString";
   close OUT;

---