Devel::FastProf - "fast" perl per-line profiler
$ perl -d:FastProf my_script.pl $ fprofpp -t 10
Devel::FastProf tells you how much time has been spent on every line of your program.
Devel::FastProf is a perl per-line profiler. What that means is that it can tell you how much time is spent on every line of a perl script (the standard Devel::DProf is a per-subroutine profiler).
I have been the maintainer of Devel::SmallProf for some time and although I found it much more useful that Devel::DProf, it had an important limitation: it was terribly slow, around 50 times slower than the profiled script being run out of the profiler.
So, I rewrote it from scratch in C, and the result is
Devel::FastProf, that runs only between 5 and 8 times slower than under normal execution... well, maybe I should have called it
Devel::FastProf with your programs, you have to call perl with the
-d switch (see perlrun) as follows:
$ perl -d:FastProf my_script.pl
Devel::FastProf will write the profiling information to a file named
fastprof.out under the current directory.
To analyse the information on this file use the post processor script fprofpp included with this package.
Some options can be passed to
Devel::FastProf via the environment variable
allows to change the name of the output file.
Devel::FastProfmeassures the wall clock time spent on every line, but if this entry is included it will use the cpu time (user+system) instead.
this option has to be used if the profiled script forks new processes, if you forget to do so, a corrupted
fastprof.outfile could be generated.
Activating this mode causes a big performance penalty because write operations from all the processes have to be serialized using locks. That is why it is not active by default.
This is an example of how to set those options:
$ FASTPROF_CONFIG="usecputime,filename=/tmp/fp.out" \ perl -d:FastProf myscript.pl
No Windows! No threads!
I have only tested it on Linux actually.
The code of subroutines defined inside
eval "..." constructions that do not include any other code will not be available on the reports. This is caused by a limitation on the perl interpreter.
Option -g is buggy, it only works when all the modules are loaded in the original process.
perl 5.8.8 required!
If you find any bug, please, send me an e-mail to email@example.com or report it via the CPAN RT system.
Copyright (C) 2005-2006 by Salvador Fandiño <firstname.lastname@example.org>.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or, at your option, any later version of Perl 5 you may have available.