agsh / hs2s-lab Goto Github PK

Если у меня

findLangNodes :: Cursor -> [Cursor]
findLangNodes = element "table" >=> attributeIs "class" "infobox vevent" &// element "tr" &// element "th" &// check (\x -> stringEq (T.unpack $ T.concat (content x) :: String) ("Appeared in" :: String) :: Bool)  >=> following

Но я не хочу чтобы у меня был список из курсоров на нужный мне тег и все которые под ним.
Из документации XPath
following:: — Возвращает необработанное множество, ниже текущего элемента.

я хочу взять только голову этого списка, т.е только курсор на нужный мне тег, как это можно сделать? head не получается, через анонимные функции что-то тоже не очень, постоянно ошибки типов

И кстати не смотря на

findLangNodes :: Cursor -> [Cursor]

Haskell говорить что там нифига не [Cursor]

при тестировании недописанной проги сжирает всю память и выбрасывает ": out of memory" это нормально для хаскеля?

Откуда получать год появления языка?
подразумевалось, что отсюда:
У некоторых есть табличка и там строка "Appeared in 1986" ?
если да, то проблема в том, что на разных страницах таблица составлена по-разному:
1.

На одном уровне DOM-дерева между собой чередуются заголовки < h2 > и списки < ul >. Никаких отличительных признаков наподобие "id" у списков нет.

Каким образом можно определить под каким заголовком расположен список? Найти следующий за < h2 > тэг при помощи функции "followingSibling :: Axis node" у меня не получается. Не до конца понятно ее определение: относительно чего она вернет сиблинга, если вызывается без параметров.

Беру перлы преподов

Так и не понятно как тут заливать. На https://code.google.com + TurtoiseSVN интуитивно понятно, а тут ад какой-то. Лабу залил в свою ветку, дальше не знаю как.

при запуске примера выдает ошибку "*** Exception: FailedConnectionException2 "cyber.mephi.ru" 80 False getAddrInfo: does not exist (error 10093)"

Не получается сделать Pull Request