[adamm@mustafa adamm]$ perl -d:DProf test.pl 
[adamm@mustafa adamm]$ dprofpp tmon.out 
Total Elapsed Time = 0.019937 Seconds
  User+System Time = 0.019944 Seconds
Exclusive Times
%Time ExclSec CumulS #Calls sec/call Csec/c  Name
 0.00   0.000 -0.000      3   0.0000      -  Foo::BEGIN
 0.00   0.000 -0.000      1   0.0000      -  strict::import
 0.00   0.000 -0.000      1   0.0000      -  strict::bits
 0.00   0.000 -0.000      2   0.0000      -  Foo::zap