-
-
16 Mar 2012 15:03:33 UTC
- Distribution: Devel-Trace
- Module version: 0.12
- Source (raw)
- Browse (raw)
- Changes
- How to Contribute
- Issues (1)
- Testers (2086 / 1 / 0)
- Kwalitee
Bus factor: 1- 13.79% Coverage
- License: unknown
- Activity
24 month- Tools
- Download (3.09KB)
- MetaCPAN Explorer
- Permissions
- Subscribe to distribution
- Permalinks
- This version
- Latest version
- Dependencies
- unknown
- Reverse dependencies
- CPAN Testers List
- Dependency graph
NAME
Devel::Trace - Print out each line before it is executed (like
sh -x
)SYNOPSIS
perl -d:Trace program
DESCRIPTION
If you run your program with
perl -d:Trace program
, this module will print a message to standard error just before each line is executed. For example, if your program looks like this:#!/usr/bin/perl print "Statement 1 at line 4\n"; print "Statement 2 at line 5\n"; print "Call to sub x returns ", &x(), " at line 6.\n"; exit 0; sub x { print "In sub x at line 12.\n"; return 13; }
Then the
Trace
output will look like this:>> ./test:4: print "Statement 1 at line 4\n"; >> ./test:5: print "Statement 2 at line 5\n"; >> ./test:6: print "Call to sub x returns ", &x(), " at line 6.\n"; >> ./test:12: print "In sub x at line 12.\n"; >> ./test:13: return 13; >> ./test:8: exit 0;
This is something like the shell's
-x
option.DETAILS
Inside your program, you can enable and disable tracing by doing
$Devel::Trace::TRACE = 1; # Enable $Devel::Trace::TRACE = 0; # Disable
or
Devel::Trace::trace('on'); # Enable Devel::Trace::trace('off'); # Disable
Devel::Trace
exports thetrace
function if you ask it to:import Devel::Trace 'trace';
Then if you want you just say
trace 'on'; # Enable trace 'off'; # Disable
TODO
You should be able to send the trace output to the filehandle of your choice.
You should be able to specify the format of the output.
You should be able to get the output into a string.
We'll see.
LICENSE
Devel::Trace 0.11 and its source code are hereby placed in the public domain.
Author
Module Install Instructions
To install Devel::Trace, copy and paste the appropriate command in to your terminal.
cpanm Devel::Trace
perl -MCPAN -e shell install Devel::Trace
For more information on module installation, please visit the detailed CPAN module installation guide.