foreach(@datei){
    # leerzeilen interessieren nicht...
    next if /^$/;