if( $line =~ /^Context/ ){
        $line =~ s/^Context:\s+//;
        my @array = split /\s/, $line;
        if( $array and $array[2] ne '' ){
            # mach was wenn $array[2] nicht leer ist...
        }
        $line = join "|", @array;
        print $context $line;
    }