a Perl code profiler