Процедура извлечения редакторов вики-страницы
Материал из Letopisi.Ru — «Время вернуться домой»
Версия от 08:06, 26 марта 2010; Евгений Патаракин (обсуждение | вклад)
Извлечение названий страниц
Строки
- Главная страница (772 219 просмотров)
- Текущие события (76 297 просмотров)
Решение:
open (DATA,"pages.txt") || die ;
while (<DATA>) {
chomp ;
s/\S\(\d.*$// ;
print "$_\n"
}
Надо, чтобы оставалось только:
- Главная страница
- Текущие события
Извлечение редакторов статьи
- (текущ.) (пред.) 22:11, 13 марта 2010 Тимохина Евгения (Обсуждение | вклад | заблокировать) (10 636 байт) (отменить)
Из этого нужно оставить только имя участника (то, что после четырехзначной даты + пробел) и до пробел (Обсуждение
- Потом подсчитать сколько раз встречается это имя в строке
