perl-Devel-Trace (Print out each line before it is executed)
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.
This is something like the shell's -x option.