Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]11336[/thread]

Zeitmessung mit höherer Genauigkeit als Sekunden



<< >> 6 Einträge, 1 Seite
AndiS
 2008-02-21 15:15
#106162 #106162
User since
2008-02-20
9 Artikel
BenutzerIn
[default_avatar]
Hallo!

ich schreibe zur Zeit ein kleines Script das einen system-Befehl absetzt und darauf hin untersuchen soll wie lange der Befehl braucht.

Code (perl): (dl )
1
2
3
4
5
6
                        
$start = time;
system($xcopyString);
$ende = time;
                        
printf "Test " . ($j + 1) . " - execution time: %d in seconds\n", $ende - $start;


Leider erlaubt time nur die Messung auf Sekundengenauigkeit, ich hätte es aber gerne etwas genauer ;-)
Der times-Befehl, der ja die cpu-seconds misst scheint mir nicht das richtige zu sein, weil es sich ja um einen system-call handelt. Ein Test mit times ergab wie nicht anders zu erwarten eine Zeitspanne von 0 Sekunden.

Hat da jemand eine Idee? Danke euch :)

Schöne Grüße,

AndiS
moritz
 2008-02-21 15:20
#106165 #106165
User since
2007-05-11
923 Artikel
HausmeisterIn
[Homepage]
user image
Time::HiRes ist die Antwort!
renee
 2008-02-21 15:21
#106166 #106166
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
CPAN:Time::HiRes
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/
Taulmarill
 2008-02-21 16:52
#106184 #106184
User since
2004-02-19
1750 Artikel
BenutzerIn

user image
Wenn du unter Unix/Linux/BSD arbeitest, würde ich dafür den Systembefehl time verwenden. Der gibt sehr detaillierte Informationen zur Verwendeten CPU- bzw. Realzeit zurück.
$_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78
0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0
F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B
AndiS
 2008-02-21 17:10
#106187 #106187
User since
2008-02-20
9 Artikel
BenutzerIn
[default_avatar]
Ich danke euch!

Jetzt hab ich auch gleich mal entdeckt was sich hinter den Perl Modulen versteckt.
Bin halt ein Perl-Noob ;-)

Schöne Grüße,

Andi
betterworld
 2008-02-21 18:22
#106189 #106189
User since
2003-08-21
2614 Artikel
ModeratorIn

user image
Dazu kann man ja auch Benchmark benutzen.
<< >> 6 Einträge, 1 Seite



View all threads created 2008-02-21 15:15.