На информационном ресурсе применяются cookie-файлы. Оставаясь на сайте, вы подтверждаете свое согласие на их использование.
Поменять строки местами
5027
13
Нужно в текстовом файле, типа блокнотного, поменять местами строки на обратную последовательность - чтобы первая стала последней, а последняя первой.
Руками както напрягает (строк много). Может както автоматизировать?
Руками както напрягает (строк много). Может както автоматизировать?
Может, AWK посмотреть? Он на обработку строк заточен. А так с разбегу из готового ничего в голову не приходит, кроме C++ 
Вот уж чтоб не изобретать велик и не связываться с программированием (хотя там программировать то на 2 минуты), закачиваешь в Excel, добавляешь цифровой столбец от 1 до... Делаешь обратную сортировку по этому столбцу, удаляешь его. То, что осталось, сохраняешь.
Mad_Dollar
guru
использовать ексель самое простое конешно )))
cat original_file.txt | perl -e "@a = < > ; @a = reverse @a; print join("\n",@a);" > reversed_file.txt
strannik
v.i.p.
С перлом не знаком , а вот с php немного баловался. По крайней мере прочитать и записать смогу. А инвертировать в нем как?
И про ехсель спасибо, чтото не подумал про него. В таких случаях мультиедит обычно вспоминается, но он был в досе.
И про ехсель спасибо, чтото не подумал про него. В таких случаях мультиедит обычно вспоминается, но он был в досе.
Дельфу найдешь, поди? Дарю
var iStr, outStr: TStringList;
i: integer;
begin
iStr := TStringList.Create; outStr := TStringList.Create;
iStr.LoadFormFile('...');
for i := 0 to iStr.Count-1 do outStr.Add(iStr[iStr.Count-1-i]);
outStr.SaveToFile('...');
iStr.Free; outStr.Free;
end;
var iStr, outStr: TStringList;
i: integer;
begin
iStr := TStringList.Create; outStr := TStringList.Create;
iStr.LoadFormFile('...');
for i := 0 to iStr.Count-1 do outStr.Add(iStr[iStr.Count-1-i]);
outStr.SaveToFile('...');
iStr.Free; outStr.Free;
end;
pavelv
experienced
tac file.txt > file_reversed.txt
Что изобретать-то?
Что изобретать-то?
Сейчас читают
Обмен/продажа детских вещей (часть 2)
353790
1000
Когда мне будет .... много лет...
329087
1000
Прошу критики-2.
237745
1000
Просто область использования этой команды довольно специфичная, для узенького круга задач
tac file.txt > file_reversed.txtА это в чем? И как использовать?
Э... Ну вообще-то это linux, но можно и в windows Cygwin поставить, там тоже будет работать. Но в этом случае, наверное, проще руками исправить
А поиск с заменой не канает?
Не понял. А причем тут поиск с заменой?