Community  »  Perl: Allgemeines Forum

Zeitmessung trotz system() Aufruf	Seitenanfang
Hallo, ich benutze ein PerlSkript um mir .xml Files zu parsen und damit mehr oder weniger immer dasselbe Programm zu füttern. Ich möchte nun die Zeit messen, die ich für ALLES brauche, d.h. mein Skript (bekomme ich über ein times() am Ende) aber auch die der mittels system() aufgerufenen Prozesse. Läßt sich das irgendwie einfach und schlicht machen? Eigentlich sollte es ja irgendwie möglich sein, dass nach dem fork() der Mutterprozeß wartet und derweilen die Zeit mißt... Ich habe irgendwan schonmal ne timedShell geschrieben die sowas konnte (damals C) aber irgendwie hab ich nen Hänger im Kopf. Anyone help? Aussagekräftige Links reichen mir auch völlig - Danke im Vorraus Micha Datum: 04.05.2005-20:50
re: Zeitmessung trotz system() Aufruf	Seitenanfang
use Time::HiRes qw(gettimeofday tv_interval ); my $start = [gettimeofday]; work() and work() and fork() or do_something_else(); my $elapsed = tv_interval ( $t0, [gettimeofday]) / 1000; print "used $elapsed milliseconds\n"; ############################################ __END__ Ich hoffe, das hilft Datum: 08.05.2005-16:05