Re: dprofpp -g doesn't work for me

This is using AS 5.6.1 on NT4.

C:\test>dprofpp -g Date::Manip::ParseDate
Total Elapsed Time = -0.00257 Seconds
  User+System Time = 0.127452 Seconds
Exclusive Times
%Time ExclSec CumulS #Calls sec/call Csec/c  Name
 23.5   0.030  0.059      2   0.0150 0.0297  Date::Manip::ParseDateStr
+ing
 15.6   0.020  0.020      2   0.0100 0.0100  Date::Manip::Date_Regexp
 15.6   0.020  0.020     18   0.0011 0.0011  Date::Manip::IsInt
 15.6   0.020  0.020      2   0.0100 0.0100  Date::Manip::ParseDateDel
+ta
 14.9   0.019  0.078      2   0.0097 0.0389  Date::Manip::Date_Init
 7.85   0.010  0.010      2   0.0050 0.0049  Date::Manip::CheckFilePat
+h
 7.85   0.010  0.020      1   0.0100 0.0198  Date::Manip::FixPath
 0.00   0.000  0.127      2   0.0000 0.0637  Date::Manip::ParseDate
 0.00   0.000  0.020      1   0.0000 0.0196  Date::Manip::SearchPath
 0.00   0.000 -0.000      3   0.0000      -  Date::Manip::FullFilePath
 0.00   0.000 -0.000      3   0.0000      -  Date::Manip::ExpandTilde
 0.00   0.000 -0.000      3   0.0000      -  Date::Manip::CleanFile
 0.00   0.000 -0.000      1   0.0000      -  Date::Manip::Date_Init_En
+glish
 0.00   0.000 -0.000      4   0.0000      -  Date::Manip::Date_InitLis
+ts
 0.00   0.000 -0.000     25   0.0000      -  Date::Manip::Date_InitStr
+ings
[download]

You do need to specify the exact name of the subroutine, including its package and case sensitively. It seems to work ok.

Examine what is said, not who speaks.

"Efficiency is intelligent laziness." -David Dunham
"Think for yourself!" - Abigail
Hooray!

Comment on Re: dprofpp -g doesn't work for me Download Code

Replies are listed 'Best First'.
Re: Re: dprofpp -g doesn't work for me by DrWhy (Chaplain) on Jan 07, 2004 at 21:08 UTC
Thanks for the input. Okay, so the thing isn't completely hosed for everyone. Can you do me a favor and look at (grep) the tmon.out file that was used to produce your example output and see if there were any lines that are an asterisk followed by a hexadecimal number (e.g. '* 2b'). These are the lines that are causing my setup to crash. If I change them to, e.g. "+ 2b" (for which '* 2b' appears to be a variation of some kind) the trouble goes away -- of course, I'm not sure I'm getting accurate results this way. Update: changing all the '* xNUM' lines in the tmon.out to '+ xNUM' does still give me the correct (or at least the same) output. However you have to use the -F switch because it confuses dprofpp about exits from the relevent subroutines calls. I guess this workaround will work sufficiently for my purposes.	[reply]
Re: Re: Re: dprofpp -g doesn't work for me by BrowserUk (Patriarch) on Jan 07, 2004 at 22:05 UTC
No. There were no "* xx" lines in tmon.out, so I added one and got `C:\test>dprofpp -g Date::Manip::ParseDate Modification of non-creatable array value attempted, subscript -1 at d +:\perl\bin/dprofpp.bat line 692, <fh> line 664.` [download] Looking at the POD for Dprof, there is this line Lines starting with +, - and mark entering and exit of subroutines by ids, and goto &subr.* Which I interpret to mean that lines starting with * indicate a trnasfere of control using `goto &subr`. A curosry grep through the sources of the modules (strict, Date::Manip etc.) that are used by the test program didn't turn up any gotos. I think you have the source of the problem. You could try replace each occurance of "* xx" with `+ xx - xx` [download] which should amount to the same thing, but you would need to consult the author/maintainer for a confirmation (and fix). HTH. Examine what is said, not who speaks. "Efficiency is intelligent laziness." -David Dunham "Think for yourself!" - Abigail Hooray!	[reply] [d/l] [select]
Re: Re: Re: Re: dprofpp -g doesn't work for me by DrWhy (Chaplain) on Jan 08, 2004 at 18:33 UTC
Thanks again for the input. I swear I read that line, > Lines starting with +, - and mark entering and exit of subroutines by ids, and goto &subr.* five times and never got the fact that * == 'goto &subr'. The fix you suggest does not work. It just mangles the file. Just changing * to + works more or less, but requires you to use -F and the timing data for the subs that call goto are messed up. A better fix would look something like this. Change `+ yy & zz pkg subname * zz - zz` [download] to `+ yy - yy & zz pkg subname + zz - zz` [download]	[reply] [d/l] [select]