 |
|
Модераторы: korob2001, ginnie |
 
|
|
Парсинг кода Perl, на perl 
| Error202 |
|
|||
|
Бывалый  Профиль Группа: Участник Сообщений: 195 Регистрация: 5.11.2004 Где: Moscow Репутация: нет Всего: нет |
Господа!
Как можно распарсить перлом скрипт перла? Нужно узнать все переменные(массивы, хэши) и номера строк, где они находятся |
|||
|
||||
Дата 20.1.2010, 15:10 (
Загрузка ...
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
PPI?
|
|||
|
||||
| Error202 |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 195 Регистрация: 5.11.2004 Где: Moscow Репутация: нет Всего: нет |
PPI - распарсить может... Но максимум я получил список переменных... а как узнать номера строк их раположения - вопрос...
Это сообщение отредактировал(а) Error202 - 20.1.2010, 15:51 |
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
perldoc PPI::Element
|
|||
|
||||
| Error202 |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 195 Регистрация: 5.11.2004 Где: Moscow Репутация: нет Всего: нет |
Да я уже его весь перевернул, но мозга не хватает :(
|
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
блин, зачитывание вслух документации -- 50€/h
берете документ, извлекаете первый стейтмент, затеме чере next_siblin или snext_sibling обходите его. |
|||
|
||||
| Error202 |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 195 Регистрация: 5.11.2004 Где: Moscow Репутация: нет Всего: нет |
'Statement::Variable' выдает только объявления переменных, а далее по коду уже тишина :(
|
|||
|
||||
| Error202 |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 195 Регистрация: 5.11.2004 Где: Moscow Репутация: нет Всего: нет |
Разобрался, толко теперь снова проблема...
Он переменные вида $hash{'test'} пишет как $test... Как-то это надо обработать еще |
|||
|
||||
| shamber |
|
|||
 Эксперт Профиль Группа: Завсегдатай Сообщений: 1422 Регистрация: 5.9.2006 Где: Россия Репутация: 17 Всего: 18 |
я так понял, что у тебя такса стандартная  50€ на все |
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
только если не надо вставать с дивана
|
|||
|
||||
|
|
| Правила форума "Perl" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0797 ] [ Использовано запросов: 21 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |