Das kann auch nicht funktionieren. Denn die Fehlermeldung bei ALRM ist natürlich nicht "alarm\n" sondern so, wie sie bei die üblich ist. Wenn Du ein Wort in das die einbaust, dann teste es mit /\balarm\b/ und dann kann das Wort stehen wo es will.

Außerdem muß nach dem eval-Block auch noch ein alarm 0 rein. Es kann passieren, daß alles gut läuft, Du in die nächste Schleifenrunde eintrittst und die $SIG-sub neu definierst und genau dann kommt der alte alarm. Dann bist Du noch nicht mal im regulären Ausdruck und das eval bricht trotzdem ab. Denke nie nie, es ist nur die Frage der Zeit bis nie trotzdem eintritt - steht so auch im Kochbuch.\n\n

<!--EDIT|steffenw|1114455389-->