stack trace в перле

[2heoh]

Я уже больше 5 лет пишу на перле, но правило "век живи - век учись" никто не отменял :)

Иногда бывает когда ковыряешься в чужом говнокоде и надо надо узнать а откуда же этот кусок кода вызывается, то тогда на помощь приходит модуль Carp, а точнее функция из него cluck.

Делается это просто:

use Carp q/cluck/;
warn cluck;
выводит все вызовы "вверх" до

Comments

[provokatorz]

А caller в цикле чем не угодил?

[2heoh]

это как? так чтоли:

for (1..N) { caller($_) }

?

[allter]

Типа. Кстати, об отладке - некоторое время назад мне пришлось, таки, изучить перловый отладчик, что бы отладить систему с мегазапутанной архитектурой - посмертная отладка уже не получалась, хоть ты в 100 местах cluck`и расставь. Правда на пост ( http://ru-perl.livejournal.com/398049.html ) мне никто ничего внятного не ответил, так что отладка CGI/mod_perl до сих пор затруднительна.

[2heoh]

а как N узнать? или можно поставить 100 с запасом? cluck мне кажется как-то провославней :)

а дебаггер с модперлом вобще никак, да... use Data::Dumper; warn Dumper ... :)

твой пост я видел, но сказать было нечего :) это у тебя низкоуровневый дебаг DBI.pm какой-нить? в итоге разобрался?