blob: b4a561ba0f12365c185b58229e86b9993430d104 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
This module lets you add debugging instructions which look
like comments and do nothing unless you 'use' this module.
use Devel::StealthDebug;
my $foo = 0;
# ... Several processing on $foo
my $bar = 1 / $foo; #!assert($foo != 0)!
my %myhash; #!watch(%myhash)!
sub func1 { #!emit(Entering func1)!
#...
}
WWW: http://search.cpan.org/dist/Devel-StealthDebug/
|
