# Perl Module - Devel::Module::Trace Devel::Module::Trace is a perl module which prints a table of all used and required module with its origin and elapsed time. This helps tear down slow modules and helps optimizing module usage in general. This module uses the Time::Hires module for timing and the POSIX module for the final output which may slightly interfer your results. ## Usage ``` perl -d:Module::Trace[=,,...] -M -e exit ``` ## Options Options are supplied as command line options to the module itself. Multiple options can be separated by comma. ``` perl -d:Module::Trace=,,... -M -e exit ``` ### print Make the module print the results at exit. ``` perl -d:Module::Trace=print -MBenchmark -e exit ``` ### filter Output filter are defined by the filter option. Multiple filter can be used as comma separated list. The generic `perl` filter hides requires like `use 5.008`. ``` %> perl -d:Module::Trace="print,filter=strict.pm,filter=warnings.pm,filter=perl" -MBenchmark -e exit ``` ## Output The result is printed to STDERR on exit if using the `print` option. You can get the raw results at any time with the `Devel::Module::Trace::raw_result` function and force print the results table any time by the `Devel::Module::Trace::print_pretty` function. ``` %> perl -d:Module::Trace="print,filter=strict.pm,filter=warnings.pm,filter=perl" -MBenchmark -e exit ------------------------------------------------------------------------------------------------------- | 13:41:07.37458 | Benchmark.pm | 0.013697 | -e:0 | | 13:41:07.37576 | Carp.pm | 0.006555 | /usr/share/perl/5.18/Benchmark.pm:432 | | 13:41:07.38211 | Exporter.pm | 0.000142 | /home/sven/perl5/lib/perl5/Carp.pm:35 | | 13:41:07.38245 | Exporter.pm | 0.000136 | /usr/share/perl/5.18/Benchmark.pm:433 | | 13:41:07.38289 | Time/HiRes.pm | 0.000138 | (eval 34)[/usr/share/perl/5.18/Benchmark.pm:454]:2 | ------------------------------------------------------------------------------------------------------- ``` ## Example To get module trace information for the Benchmark module use this oneliner: ``` perl -d:Module::Trace=print -MBenchmark -e exit ```