SZ
Разбавлю ваш код-стайл срач :)
Как вытащить код сабы из перлового исходника? Идея с B::Deparse не взлетела :(
Как вытащить код сабы из перлового исходника? Идея с B::Deparse не взлетела :(
Чо значит не взлетела?
Size: a a a
2021 January 13
DF
Проблема в том, что там часть сьютов идет со своими костылями и тесты ломаются. Вот мне надо выдрать эти костыли и скопипастить их в те сьюты что я создаю.
SZ
У меня есть пачка сьютов, я их загружаю, выгружаю из них полный список тестов, режу кусками и эти куски отправляю для разных воркеров. Т.е. на момент когда я это делаю - у меня окружения для запуска тестов нет в принципе.
Ну тогда извини, нужно работать с текстом
DF
Ну тогда извини, нужно работать с текстом
Ну да. Вопрос есть ли какой-то готовый модуль который может распарсить исходник и выдать код саб? У vti наверняка есть, но не факт что даст :)
VG
Потому что это слева направо читается
так и ->@* тоже
SZ
так и ->@* тоже
Ну нет, контекст как пропогируется?
SZ
Ну да. Вопрос есть ли какой-то готовый модуль который может распарсить исходник и выдать код саб? У vti наверняка есть, но не факт что даст :)
Перл может быть распаршен только перлом. По-другому -- не получится
SZ
Ну да. Вопрос есть ли какой-то готовый модуль который может распарсить исходник и выдать код саб? У vti наверняка есть, но не факт что даст :)
У меня к тебе встречный вопрос: с чего ты решил, что оно не скомпилится?
SZ
Можешь дать пример кода?
AK
Ну нет, контекст как пропогируется?
через сигил
SZ
через сигил
Сигил часто только задаёт его, а пропогируется иначе
DF
Перл может быть распаршен только перлом. По-другому -- не получится
Расскажи это @hurricup :)
DF
У меня к тебе встречный вопрос: с чего ты решил, что оно не скомпилится?
Ну так я проверил
SZ
Ну так я проверил
Ну так ты покажи код, я тоже хочу проверить
DF
Ну так ты покажи код, я тоже хочу проверить
Ну это кагбэ рабочий код :) Просто на момент запуска B::Deparse ещё не существует окружения в котором может нормально собрать этот модуль. В результате вылетает ошибка загрузки, что логично.
SZ
Ну это кагбэ рабочий код :) Просто на момент запуска B::Deparse ещё не существует окружения в котором может нормально собрать этот модуль. В результате вылетает ошибка загрузки, что логично.
Да как это? Что ломается? require?
Чему там ещё ломаться
Чему там ещё ломаться
DF
Ну да, он самый и ломается
SZ
Ну да, он самый и ломается
Ну дык почини, чо ты как маленький
https://PerlBanjo.com/989a7cebf2
https://PerlBanjo.com/989a7cebf2
DF
Ну дык почини, чо ты как маленький
https://PerlBanjo.com/989a7cebf2
https://PerlBanjo.com/989a7cebf2
Да что-то я не готов все окружение поднимать ради такого.
2021 January 14
SZ
Да что-то я не готов все окружение поднимать ради такого.
Зачем поднимать окружение? Я тя не понимаю