Lineseperator Problem

[Karle]

Hi,

»» »» Kann es sein, daß die Leerzeile zwischen Ausgabe 3 und Ausgabe 1 gar nicht leer ist, sondern vielleicht Leerzeichen/Tabs/sonstigen Whitespace enthält?
»»
»» Ja, ist möglich und bin grad am überlegen, wie das rausfinden kann ...

Schau Dir die Ausgabe mit einem Hex-Editor an.

open (X, "$SSH $CMD 2>/dev/null |") or die "Can't run program: $!\n";  
        while (my $section = <X>)  
        {  
                if ($section =~ /^\s+\n$/) {print "YEAH";} else{print "BLOED"};  
                print "BEGIN${section$END\n";  
        }  
  
  
Ausschnitt:  
  
BLOEDBEGIN   Ausgabe 1  
END  
BLOEDBEGIN   Ausgabe 2  
END  
BEGIN   Ausgabe 3  
END  
YEAHBEGIN  
END  
BLOEDBEGIN   Ausgabe 1  
END  
BLOEDBEGIN   Ausgabe 2  
END  
BLOEDBEGIN   Ausgabe 3  
END  
YEAHBEGIN  
END

Wenn ich das richtig deute, dann sind da tatsächlich irgendwelche Leerzeichen drin - verdammt!