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