Umgebungsvariablen setzen - #137975 (Perl/CGI)

GwenDragon

2010-06-03 18:27

User since
2005-01-17
14749 Artikel
Admin1

Nö, wieso sollte das ein schlechter Stil sein.

das könnte so gehen:

Code (perl): (dl )

BEGIN {
  use vars qw($startzeit);
  $ENV{'STARTZEIT'} = $startzeit = time(); # als Unix-Timestamp
}

Oder etwas genauer mit CPAN:

Time::HiRes:

Code (perl): (dl )

BEGIN {
  use Time::HiRes;
  use vars qw($startzeit);
  $ENV{'STARTZEIT'} = Time::HiRes::time; # als float Timestamp mit Bruchteilen von Sekunden
}

Beispiele zu Time::HiRes

Allerdings ist die Umgebungsvariable nur solange verfügbar wie das Skript läuft.
Last edited: 2010-06-03 18:28:18 +0200 (CEST)

die Drachin Gwen

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