ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Vadim Kuznetsov                      2:5020/9393.11 17 Jan 2003  01:15:18
 To : All
 Subject : парсинг текста
 -------------------------------------------------------------------------------- 
 

 
 Подскажите, как решить такую задачу - дан текстовый файл вида:
 ----------------------------
 56789
 Ля-ля-ля-три-рубля x0Dx0A
 три рубля - ля-ля-ля x0Dx0A
 
 543 тоже какой-то x0Dx0A
 текст x0Dx0A
 
 87654
 И вот еще текст
 ----------------------------
 надо получить каждое пятизначное значение (в одну переменную) и текст за ней в
 другую переменную, трехзначные значения и текст с ними пропустить.
 
 Проблема в следующем - удается получить лишь одну строку за пятизначной цифрой,
 то есть в переменной 1 получаем '56789' а в переменной 2 'Ля-ля-ля-три-рубля
 x0Dx0A':(
 как бы так выборочно убрать окончания строк, чтобы в переменную 1 попадало
 значение '56789', а в переменную 2 попадало целиком 'Ля-ля-ля-три-рубля три
 рубля - ля-ля-ля'?
 
 Заранее спасибо!
 
  [ы] http://linux.rdcom.ru
      mail:*asp#gmx.co.uk* icq:_10513357_
 --- GoldED+/W32 1.1.4.5, FastFTN v1.55
  * Origin: Remember, Speed kills! Try Windows to relax. (2:5020/9393.11)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор