Perl'de izlemeyi açmanın bir yolu var mı (bash -x'e eşdeğerdir)?

Question

Perl'de bir sistem komut dosyası var. Senaryoda neyin yanlış gittiğini belirlemek için biraz eşdeğer bash -x'e ihtiyacım var. Eşdeğer bir şey var mı?

DÜZENLEME: Ne bash -x, her satırı değerlendirildiği gibi yazdırmasıdır. Bu, bazı yol değişkenlerini veya dosyalarını çok kolay bir şekilde hata ayıklama kodu yapar.

use strict; 
use warnings; 

bunu hata ayıklamak istiyorsanız

, -d anahtarını kullanın:

Answer 1

Devel::Trace veya Devel::ebug'a bakın.

bu program w.pl adlı Verilen:

#!/usr/bin/perl 

use strict; 
use warnings; 

my $answer = 42; 

if ($answer == 6 * 9) { 
    print "everything is running fine.\n"; 
} else { 
    warn "there must be a bug somewhere...\n"; 
} 

Sen çalışmasını izlemek için Devel::Trace kullanabilirsiniz

:

perl -d:Trace w.pl 

şu çıktıyı üretir:

>> w.pl:6: my $answer = 42; 
>> w.pl:8: if ($answer == 6 * 9) { 
>> w.pl:11:  warn "there must be a bug somewhere...\n"; 
there must be a bug somewhere... 

Answer 2

daima perl komut bu ifadeleri içermektedir. Ve işte buradaki komutlar: http://www.domainavenue.com/pl-debug.htm

Yardım edersiniz.

Answer 3

Sen bakmak gerekir

"perl -d" (debugger'i açın) veya "perl -c" (eskiden önce betiğinizi kontrol edin)

Answer 4

Devel::DumpTrace modülünü ecuting 2011.

Numune kullanımı yana kullanılmaktadır:

$ cat demo.pl 
# demo.pl 
# a demonstration of Devel::DumpTrace 
$a = 1; 
$b = 3; 
$c = 2 * $a + 7 * $b; 
@d = ($a, $b, $c + $b); 

$ perl -d:DumpTrace demo.pl 
>>>>> demo.pl:3:  $a:1 = 1; 
>>>>> demo.pl:4:  $b:3 = 3; 
>>>>> demo.pl:5:  $c:23 = 2 * $a:1 + 7 * $b:3; 
>>>>> demo.pl:6:  @d:(1,3,26) = ($a:1, $b:3, $c:23 + $b:3);