Как установить точку останова для определенного файла в программе Perl?

Question

программа My Perl выглядит следующим образом:

foo/ 
foo/bar/ 
for/bar/test.pm 
foo.pm 
foo/bar.pm 
test.pl 

и использовать perl test.pl, чтобы запустить программу. Я хочу отлаживать sub в foo/bar/test.pm. Как установить точку останова на этом суб?

Как я могу это сделать?

Спасибо.

Answer 1

Чтобы отладить скрипт perl, используйте переключатель -d для вызова отладчика.

perl -d test.pl 

В отладчике вы можете использовать b <line no>, чтобы установить контрольную точку в текущем файле. Иногда это хлопот, чтобы установить точку останова в файле, который не был загружен или еще что был загружен уже давно, так что вы можете также поместить строку

$DB::single = 1; 

в любом месте в любой программе Perl, и отладчик прерывается сразу же после выполнения этой строки. Это также хороший способ (единственный способ?) Установить точку останова в коде, которая будет запущена во время компиляции.

Answer 2

Просто используйте полное имя переводника в качестве аргумента в b:

b foo::bar::test::subname 

Пример:

$ perl -d -e'use CGI; CGI->new' 
... 
main::(-e:1): use CGI; CGI->new 
    DB<1> b CGI::new 
    DB<2> r 
CGI::new(.../CGI.pm:337): 
337:  my($class,@initializer) = @_; 
    DB<2> q