laufzeiten von perscripten bestimmen

Andreas Roth andreas at schosemail.de
Do Mär 29 20:38:59 CEST 2007


> Wegschmeißen, Algorithmus wechseln, neu machen.
> 
> http://www.perl.com/pub/a/2004/06/25/profiling.html

ok... also das ding hat mir zumindest mal geholfen zu sehen, dass das 
script selber nicht langsam ist, sondern extrem viel Zeit in das 
Kopieren von Files verwendet wird... es wurde hier übrigens auf einem 
Wind*** ausgeführt.. jetzt kann ich mir gedanken machen, wie ich es 
besser löse...

Danke!

Andreas

C:\Temp>dprofpp
Total Elapsed Time = 16.33558 Seconds
   User+System Time = 1.445585 Seconds
Exclusive Times
%Time ExclSec CumulS #Calls sec/call Csec/c  Name
  20.2   0.292  0.850    277   0.0011 0.0031 
File::Copy::Recursive::__ANON__
  16.2   0.235  0.561     64   0.0037 0.0088  File::Copy::Recursive::fcopy
  12.9   0.187  0.201     64   0.0029 0.0031  File::Copy::Recursive::pathmk
  6.57   0.095  0.095     64   0.0015 0.0015  Win32::CopyFile
  5.53   0.080  0.930     66   0.0012 0.0141  File::Copy::Recursive::dircopy
  4.22   0.061  0.151     22   0.0028 0.0069 
main::Login_ProcessUserSettings
  3.25   0.047  0.063     26   0.0018 0.0024  Exporter::import
  2.21   0.032  0.032      4   0.0080 0.0080  Win32::OLE::GetObject
  2.21   0.032  0.032     23   0.0014 0.0014 
Config::IniFiles::_make_filehandle
  2.14   0.031  0.031      4   0.0077 0.0077  Win32::OLE::Enum::new
  2.14   0.031  0.045      1   0.0310 0.0454  main::ConnectFGFroups
  2.14   0.031  0.125     64   0.0005 0.0020  File::Copy::copy
  2.08   0.030  0.077     23   0.0013 0.0034  Config::IniFiles::ReadConfig
  2.08   0.030  0.185     26   0.0011 0.0071  main::BEGIN
  1.11   0.016  0.016      3   0.0053 0.0053 
Win32::GUI::DIBitmap::_convertToBi
                                              tmap