Thread Suche Hilfe für Projektarbeit (32 answers)
Opened by Gustl at 2011-03-17 20:21

GwenDragon
 2011-03-18 19:32
#146643 #146643
User since
2005-01-17
14761 Artikel
Admin1
[Homepage]
user image
Du solltest den Start der Messung ganz zu Anfang machen bevor die anderen Module eingebunden werden!
Sonst misst du nicht die komplette Programmlaufzeit.
Es gibt Module, die dynamisch nachladen und dann zu Laufzeit mehr Zeit brauchen.

Also so:
more (5.4kb):
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41

#!/usr/bin/perl -w

#Skriptname:  index.pl
#Funktion:    Hauptseite von Browsergame Pingu Farmer
#Autor:       Alexander Kratzer und Jörg Häfner
#Datum:       20.12.2010

#für debugging
#open FH, "> debug.txt" or die "debug.txt: $!"; print FH ""; close FH;

use Time::HiRes qw(gettimeofday tv_interval);
my $start_time;
BEGIN { $start_time = [gettimeofday()]; }  # Zeit zu Beginn des Ladens

BEGIN{
  push (@INC,"$ENV{DOCUMENT_ROOT}testumgebung/pingu/module/");
}

use strict;
use CGI;
use Switch;
use Session;

#eigene Module

use Globals;
use HTMLT;
use Subs;
use WebDB;
 
my $C = new CGI;

# hier kommt dein Code


#### ================
my $laufzeit;
END { 
  $laufzeit = tv_interval ( $start_time, [gettimeofday]);
  print "Ladezeit: $laufzeit";
 }
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View full thread Suche Hilfe für Projektarbeit