Perl-Vergleich für zwei Variabeln gleichzeitig

[Fred Furunkelstein 2012]

Hübsch mit Konstanten vorne, funktioniert bei der gezeigten Eingabe (mit reichlich Leerzeichen) und dem gezeigten split (an /,/) nur leider nicht. In $Obstfarbe steht bestenfalls " rot", aber niemals "rot".

Dann willst Du das vorher "putzen". Außerdem kannst Du nur Antworten auf Fragen bekommen, die Du auch gestellt hast.

chomp entfernt "Trennzeichen" am Ende einer Zeichenkette. Hier Deinen Zeilenumbruch.

$dummy = chomp($str);  
#gibt die Anzahl der entfernten Zeichen zurück und schreibt den geputzen String in die Variable zurück. Wenn Du den Erfolg nicht messen willst:  
chomp($str);  
  
#Eventuell willst Du dies vor dem Split tun.  
  
$str =~ s/^ //;  
#Ersetzt das führende Leerzeichen und schreibt den "geputzen" String in die Variable zurück.