Comment définir un point d'arrêt sur un fichier en particulier dans le programme en Perl?

Mon programme Perl ressemble:

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

et l'utilisation perl test.pl pour démarrer le programme.
Je veux déboguer un sub foo/bar/test.pm. Comment définir un point d'arrêt sur que les sous?

Comment puis-je faire cela?

Grâce.

  • Je ne suis pas satisfait de la réponse fournie. Qu'est-ce que le b [ln] syntaxe requise pour saut à une ligne particulière dans un fichier en particulier?
  • "f nom de fichier" dans la fenêtre du débogueur montrera le chemin d'accès complet. ensuite, copiez ce chemin et d'écrire "b full_path/test.pm:numéro de ligne"
InformationsquelleAutor everbox | 2012-01-19
  1. 28

    Pour déboguer un script perl, utilisez le -d passer à invoquer le débogueur.

    perl -d test.pl

    Dans le débogueur, vous pouvez utiliser b <line no> pour définir un point d'arrêt dans le fichier actuel. Parfois, c'est chiant à mettre un point d'arrêt dans un fichier qui n'a pas encore été chargé ou qui a été chargé il y a longtemps, de sorte que vous pouvez mettre la ligne

    $DB::single = 1;

    n'importe où dans tout programme en perl, et le débogueur s'arrête immédiatement après l'exécution de cette ligne. C'est aussi une bonne façon (la seule?) pour définir un point d'arrêt dans le code qui sera exécuté au moment de la compilation.

    • À noter, le " f " de commande dans le débogueur passer à l'affichage d'un nom de fichier, comme dans 'f /Chemin/Vers/le Module.h'; le fichier doit être déjà chargé. Ensuite, vous pouvez définir un point d'arrêt, non seulement au point d'entrée d'un sous-programme, mais pour être valable, toute la ligne dans ce fichier.
    • '$DB::simple = 1;' ligne de travail pour tout? Ce n'est pas arrêter le contrôle, je suppose
    • a travaillé pour moi.
    • Nous pouvons utiliser <>; ligne pour arrêter le contrôle (mais pas en mesure de voir toutes les valeurs d'une variable). imprimer Data::Dumper::Dumper($variable); ligne permet d'imprimer les valeurs
    InformationsquelleAutor socket puppet
  2. 11

    Juste d'utiliser le nom complet de la sous comme argument de b:

    b foo::bar::test::subname

    Exemple:

    $ 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
    • C'est la réponse à la discussion de la question. (Je le savais déjà, et qui était en fait à la recherche de l'information donnée dans les autres réponses.)
    InformationsquelleAutor ikegami