String vergleich klappt nicht *anfänger* (gelöst) (Allgemeines zu Perl)

[thread]16630[/thread]

String vergleich klappt nicht *anfänger* [gelöst]

Tags: perl5 string Ähnliche Threads

Leser: 23

Articles: hide open all | hide show old branches

+6 replies
Gast Tenuo

2011-08-16 02:15
hallo,
ich habe ein problem mit dem vergleichen 2er strings:
Code (perl): (dl )

1 2 3 4 5 6 7

print "eingabe:\n"; $input = <STDIN>; if ($input eq "asd") { print "richtig\n"; } else { print "falsch\n"; }
dieser code sollte eigentlich auf die eingabe mit "richtig" oder "falsch" antworten, aber egal, was ich eingebe, es kommt immer "falsch".

bin totaler anfänger in perl, deshalb ist die frage vielleicht ein bischen doof...

danke schonmal

modedit Editiert von pq: code-tags hinzugefügt
Last edited: 2011-08-16 09:40:09 +0200 (CEST)
- Gast wer
  
  2011-08-16 08:17
  
  chomp($input); "\n" entfernen!
  Last edited: 2011-08-16 08:42:58 +0200 (CEST)
- bianca
  
  2011-08-16 08:22
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Versuch mal if ($input =~ /^asd/) oder mach vor deinem Vergleich ein chomp(). Da dürfte das Enter mit im String stecken.
  10 print "Hallo"
  20 goto 10
- havi
  
  2011-08-16 09:33
  User since
  2003-08-04
  2036 Artikel
  BenutzerIn
  So funkt es:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14
  
  #!/usr/bin/perl use warnings; use strict; print "eingabe: "; chomp(my $input = <STDIN>); if ($input eq "asd") { print "richtig\n"; } else { print "falsch\n"; }
  
  Perl-Zeitung - http://perl-zeitung.at/
  Perl-Blog - http://usr-bin-perl.blogspot.com/
- +2 replies
- GwenDragon
  
  2011-08-16 10:21
  
  User since
  2005-01-17
  14741 Artikel
  Admin1
  
  Wenn du von STDIN einliest, wird auch das Newline (\n) mit in die Zeichenkette gespeichert.
  Damit du nur die reinen Zeichenketten vergleichen kannst, musst du vorher mit chomp ein möglicherweise vorhandenes Zeilenende in der Zeichenkette entfernen.
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - Gast Tenuo
    
    2011-08-16 10:52
    
    vielen Dank für eure schnelle Hilfe (auch bei der Formatierung :-S) !!!
    Last edited: 2011-08-16 11:00:50 +0200 (CEST)

View all threads created 2011-08-16 02:15.