#!/usr/bin/perl -w

$| = 1;
use strict;
use warnings;

BEGIN {
    open( STDERR, ">> stderr.log");
}

sub DaKommt
der Fehlerhfate Code ödäää?

END{
    close( STDERR );
}
1;