• Как добавить строку в файл с помощью Perl?

    alsopub
    @alsopub
    Без массива.

    Читать по одной строке из файла, записывать по одной строке во временный файл.
    Когда встретится нужный раздел - записать во временный файл дополнительную строку.
    Переименовать временный файл в исходный.
    Временный файл лучше разместить рядом (в том же каталоге) чтобы сработал rename.

    Мне кажется если в вашем примере заменить "username4" на "u4" то получится каша.
    Файлы нельзя просто так взять и "растянуть" или "сжать" в середине.
    Максимум что можно сделать - обрезать с конца или дописать в конец.
    Ответ написан
    1 комментарий