форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Архивированная нить - только для чтения!  Пред. тема | След. тема
Форумы OpenNET: Виртуальная конференция (Public)
Изначальное сообщение		[Проследить за развитием треда]

"В Perl вывести содержимое файла после пустой строки ?"
Сообщение от Вася on 27-Авг-03, 09:51  (MSK)
есть файл : 7654747 47645675 456745745 456745 4567546 54675467 546754 как с помощью перл вывести содержимое файла только после пустой строки, кол-во строк в файле всегда разное от 10 до 200 и более, но разграничитель пустая строка всегда присутствует. Спасибо.
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "В Perl вывести содержимое файла после пустой строки ?"
Сообщение от JGU on 27-Авг-03, 10:12  (MSK)
Не совсем понял чего тебе надо но кажись вот енто: #!/usr/local/bin/perl -w my $flag=0; open F,"digf.txt"; while (<F>) { if (!$flag) { $flag=!/\d+/; } else { print; }; };
	Рекомендовать в FAQ | Cообщить модератору | Наверх

	2. "В Perl вывести содержимое файла после пустой строки ?"
	Сообщение от Вася on 27-Авг-03, 11:38  (MSK)
	Спасибо за идею ! Все сработало, немного под себя подправил.
		Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.