Discussion :

[vince26]

Bonjour,

Je cherche une fonction perl qui me permettrait de calculer le temps de chargement de ma page Web.

Est ce que quelqu'un pourrait me mettre sur la voie.

[GLDavid]

Quelque chose de ce style ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
#!/usr/bin/perl -w
 
use strict;
use CGI;
 
my $q = new CGI;
my $t1 = time;
print $q->header;
print $q->start_html('Hello world');
print "<div align=\"center\">"; 
print $q->h1("Hello World !");
print "</div>";
print "<p>";
my $t2 = time;
my $t=$t2-$t1;
print "Temps de chargement de la page : $t s</p>";

@++