sub start { # check-Variable auf 1 (on) stellen.. open (ONOFF,">OnOff.num") || die ("Can't open OnOff.num!"); flock(ONOFF, 2)  or &cgierr("unable to get exclusive lock on OnOff.num.\nReason: $!"); print ONOFF "1"; close ONOFF; #&endlessLoop(); # geht so nicht weil auf return-value wartet.. # hier wartet er auch! -> warum? { exec  (&endlessLoop()) };  print STDERR "couldn't exec &endlessLoop(): $!"; &mainControlFrame(); # zurück zum HauptFrame.. }