Программирование > Perl

Как удалить строку из файла

(1/4) > >>

Yaroslav:
Как удалить строку ( например №3) из файла
если можно примерчик плз..

frg:
Закачиваешь содержимое файла в массив (@aa), передаешь cодержимое массива в другой массив (@bb),ведешь счетчик строк, если номер строки (@aa) равен 3, то пропускаешь ее. Вот и все. А потом очищаешь содержимое предыдущего файла и закачиваешь в него содержимое @bb.

Chs:

--- Цитировать ---frg (02-04-2001 07:04):
Закачиваешь содержимое файла в массив (@aa), передаешь cодержимое массива в другой массив (@bb),ведешь счетчик строк, если номер строки (@aa) равен 3, то пропускаешь ее. Вот и все. А потом очищаешь содержимое предыдущего файла и закачиваешь в него содержимое @bb.
--- Конец цитаты ---
А с использованием одного массива, слабо?
:)

Yaroslav:
Теорию я знаю, примерчик мне бы..........

frg:
Можно и так
#!/usr/local/bin/perl

open (FILE,"tt.txt");
@LINES=;
close(FILE);

$le=$#LINES-1;

open(DATA,"+

Навигация

[0] Главная страница сообщений

[#] Следующая страница

Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 
Перейти к полной версии