my $OUT; open($OUT, '>', $zaehlerfile) or scriptAbbruch("Konnte Zählerdatei nicht öffnen."); print {$OUT} $zaehler or scriptAbbruch("Konnte Zähler nicht setzen."); close($OUT);