Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: Регулярные выражения > Разбить список выражений в скобках


Автор: bonger 16.5.2011, 18:23
Здравствуйте, что нашел в темах здесь как то не помогло. Если не сложно задача:
Есть строки типа:
(abc1,abc2,abc3),(),(abc1,1,abc5,1),(abc1,1,abc5,1);
(abc1,(abc,abc),abc),(abc2,(abc,abc),abc),(abc3,(abc,abc),abc);
Т.е. список всяких значений в скобах, при этом элементы списка также могут быть скокбами с выражениями.
Мне нужно получить следующий вывод(неважно куда) для каждой строки по отдельности:
1:
abc1,abc2,abc3
abc1,1,abc5,1
abc1,1,abc5,1
2:
abc1,(abc,abc),abc
abc2,(abc,abc),abc
abc3,(abc,abc),abc
Это потом будут csv файлы...
Спасибо.

Автор: alezzz 16.5.2011, 21:16
для каждой строки
Код

print "$1\n" while (/\(([^)].*?)\)(?=,\(|;)/g);

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)