Speicherauslastung und Laufzeit (Allgemeines zu Perl)

[thread]10838[/thread]

Speicherauslastung und Laufzeit

Leser: 2

roli

2007-11-20 16:54

User since
2004-12-31
424 Artikel
BenutzerIn
[default_avatar]

Hallo,

ich wuerde gerne die Speicherauslastung die durch ein von mir geschriebenes Perlscript hervorgerufen wird "mitloggen". Als erstes würde mir schon eine Aussage ueber den maximalen Speicherverbrauch nach Beendigung des Scriptes reichen. Wenn es einen einfachen Weg gibt, wie ich das ggf. zur Laufzeit auf einzelne Befehle runterbrechen kann waere es noch schoener.
Zur Laufzeit habe ich letztenendes die selbe Frage. Ok die reine Laufzeit zu ermitteln ist nicht das Thema, aber wo wieviel Zeit "verballert" wird waere schon interessant. Ob ich mit dem Wissen, wo die meiste Zeit draufgeht das Script anschliessend optimiert bekomme steht allerdings auf einem anderen Blatt.

update: Bitte keine Tip's wie: "schau doch in den Task-Manager". Ich suche was, das mir am Ende 1-n Zahlen in der Konsole ausgibt.

Danke

Roland
--
"Steh vorn, während du fragst;
sitzen soll, wer antwortet."
Aus "Die Edda des Snorri Sturluson" "Gylfis Täuschung" Strophe 2

#Kein Kommentar

2007-11-20 17:02

User since
2007-06-09
575 Artikel
HausmeisterIn
[default_avatar]

zu der letzten frage:
schau mal in diesen thread auf den 17. Beitrag. müsste dir eigentlich weiterhelfen...

Gerade weil wir alle in einem Boot sitzen, sollten wir froh sein, dass nicht alle auf unserer Seite sind

renee

2007-11-20 17:07

User since
2003-08-04
14371 Artikel
ModeratorIn

Schau Dir mal diese Module an:

*) CPAN:

Devel::Profile
*) CPAN:

Devel::Profiler
*) CPAN:

Devel::Size
*) CPAN:

Devel::Cycle

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

roli

2007-11-22 11:42

User since
2004-12-31
424 Artikel
BenutzerIn
[default_avatar]

Hi,

#Kein Kommentar+2007-11-20 16:02:57--
zu der letzten frage:
schau mal in diesen thread auf den 17. Beitrag. müsste dir eigentlich weiterhelfen...

Klasse, damit ist mir was die Laufzeit angeht geholfen. Ich konnte so auch gleich feststellen, das eine von mir eingebaute "Verbesserung" in Wirklichkeit eine ca. 3 mal laengere Laufzeit bewirkt hat.

Wenn ich jetzt noch was hätte das mir die "spitzen Speicherauslastung" durch mein Script ausgibt waere das echt Klasse.

@renee: Nach Moeglichkeit moechte ich nur Standard Module verwenden, um so ueberall laufen zu koennen wo es Perl gibt.

Roland
--
"Steh vorn, während du fragst;
sitzen soll, wer antwortet."
Aus "Die Edda des Snorri Sturluson" "Gylfis Täuschung" Strophe 2

roli

2007-11-22 14:32

User since
2004-12-31
424 Artikel
BenutzerIn
[default_avatar]

Hi,

ich habe jetzt mal versucht das ganze in eine Windows Batch Datei zu schreiben, leider funktioniert's aber nicht wie gewuenscht.

Code: (dl )

echo "Aufruf mit Option A"
perl.exe -d_DProf .meinscript.pl -o A
dprofpp.bat

echo "Aufruf mit Option B"
perl.exe -d_DProf .meinscript.pl -o B
dprofpp.bat

...

leider sehe ich nur den Output der ersten drei Zeilen, der zweiten Block (Aufruf mit Option B) und folgende werden nie ausgeführt. Hat jemand eine Idee was da falsch ist?

Roland
--
"Steh vorn, während du fragst;
sitzen soll, wer antwortet."
Aus "Die Edda des Snorri Sturluson" "Gylfis Täuschung" Strophe 2

Froschpopo

2007-11-22 14:59

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

ziemlich coole Sache... hab ich auch direkt mal ausprobiert:

Code: (dl )

CGI::delete has 1 unstacked calls in outer
CGI::cache has 1 unstacked calls in outer
CGI::cookie has 1 unstacked calls in outer
Exporter::Heavy::heavy_export has 14 unstacked calls in outer
Exporter::Heavy::heavy_export_ok_tags has 1 unstacked calls in outer
Socket::__ANON__ has 5 unstacked calls in outer
CGI::AUTOLOAD has -5 unstacked calls in outer
Socket::AUTOLOAD has -5 unstacked calls in outer
Exporter::export has -14 unstacked calls in outer
CGI::read_from_cmdline has 1 unstacked calls in outer
CGI::header has 1 unstacked calls in outer
Total Elapsed Time = 1.232433 Seconds
  User+System Time = 0.532433 Seconds
Exclusive Times
%Time ExclSec CumulS #Calls sec/call Csec/c  Name
 35.6   0.190  0.408     22   0.0086 0.0185  main::BEGIN
 9.39   0.050  0.059     23   0.0022 0.0026  HTML::Template::Compiled::BEGIN
 5.63   0.030  0.030      1   0.0300 0.0300  Image::Magick::bootstrap
 5.63   0.030  0.030      5   0.0060 0.0060  CGI::_compile
 5.63   0.030  0.040      8   0.0037 0.0050  Net::SMTP::BEGIN
 1.88   0.010  0.010      1   0.0100 0.0100  DBD::mysql::db::_login
 1.88   0.010  0.010      1   0.0100 0.0100  CGI::import
 1.88   0.010  0.010      2   0.0050 0.0050  Text::Emoticon::BEGIN
 1.88   0.010  0.020      2   0.0050 0.0100  Community::Image::Size::BEGIN
 1.88   0.010  0.010      4   0.0025 0.0025  Cwd::BEGIN
 1.88   0.010  0.010      3   0.0033 0.0033  Math::Trig::BEGIN
 1.88   0.010  0.010      3   0.0033 0.0033  CGI::BEGIN
 1.88   0.010  0.010      1   0.0100 0.0099  DBI::install_driver
 1.88   0.010  0.020      7   0.0014 0.0028  IO::File::BEGIN
 1.88   0.010  0.010      6   0.0017 0.0017  XSLoader::load

was ist eigentlich mit diesen "unstacked-Zeilen" gemeint?

roli

2007-11-22 15:39

User since
2004-12-31
424 Artikel
BenutzerIn
[default_avatar]

Hi,

meine Bacht Datei arbeitet mittlerweile. Warum ist mir zwar schleierhaft, aber nachdem ich eine For Schleife zur optimierung um das genaz gelegt habe geht's.

Kann mir denn vielleicht jemand verraten, wie ich in der DOS-Box Informationen über die Betriebssystemversion incl. Patchlevel, die CPU und den vorhandenen RAM erhalten kann? Der Output muss uebrigens in eine Datei umleitbar sein, "winmsd" hilft mir also nicht.

Roland
--
"Steh vorn, während du fragst;
sitzen soll, wer antwortet."
Aus "Die Edda des Snorri Sturluson" "Gylfis Täuschung" Strophe 2

Gast Gast

2007-11-22 18:58

Hi roli,

Google doch mal nach WMI. Es gibt ein nettes Perl-Skript unter: http://www.roth.net/perl/scripts/scripts.asp?wmi-G...
Es funktioniert. Aber das Einlesen in WMI wird Dir nicht erspat bleiben.

Gruß,
charly

roli

2007-11-25 16:01

User since
2004-12-31
424 Artikel
BenutzerIn
[default_avatar]

Hi,

ich habe mich jetzt einige Tage mit der Laufzeitmessung mittels perl -d:DProf ... beschaeftigt. Alerdings habe ich mit dem dprofpp Ergebnis teilweise doch arge Probleme, zum Beispiel:

Code: (dl )

Total Elapsed Time = 6.109702 Seconds
  User+System Time = 5.809702 Seconds
Exclusive Times
%Time ExclSec CumulS #Calls sec/call Csec/c  Name
 24.2   1.410  1.410  50000   0.0000 0.0000  main::cmp_data
 0.52   0.030  0.030      6   0.0050 0.0050  main::BEGIN
 0.00   0.000  0.000      1   0.0000 0.0000  Exporter::Heavy::heavy_export
 0.00       - -0.000      1        -      -  warnings::BEGIN
 0.00       - -0.000      1        -      -  warnings::import
 0.00       - -0.000      1        -      -  List::Util::bootstrap
 0.00       - -0.000      1        -      -  bytes::import
 0.00       - -0.000      1        -      -  Data::Dumper::bootstrap
 0.00       - -0.000      1        -      -  Exporter::export
 0.00       - -0.000      1        -      -  strict::unimport
 0.00       - -0.000      2        -      -  DynaLoader::dl_load_file
 0.00       - -0.000      2        -      -  DynaLoader::dl_undef_symbols
 0.00       - -0.000      2        -      -  DynaLoader::dl_find_symbol
 0.00       - -0.000      2        -      -  DynaLoader::dl_install_xsub
 0.00       - -0.000      1        -      -  overload::BEGIN

Man koennte jetzt zwar sagen "Sport Religion sehr gut, Deutsch Rechnen ausreichend",... aber ich komme beim besten willen nicht auf 100% wenn ich die erste Spalte addiere, bzw. nicht auf 5,8/6,1 Sec. wenn ich Spalte 2 addiere. Kann mir jemand die differenz erklaeren?

Roland
--
"Steh vorn, während du fragst;
sitzen soll, wer antwortet."
Aus "Die Edda des Snorri Sturluson" "Gylfis Täuschung" Strophe 2

ptk

2007-11-25 21:03

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

Du siehst hier nur die Top 15.

View all threads created 2007-11-20 16:54.