Umgebungsvariablen setzen - #137975 (Perl/CGI)

GwenDragon

2010-06-03 18:27

User since
2005-01-17
14562 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, Gwendolyn

Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel