if else Anweisung (Allgemeines zu Perl)

[thread]15293[/thread]

if else Anweisung

Leser: 21

Articles: hide open all | hide show old branches

+5 replies
joelsok

2010-07-19 11:30
User since
2010-07-15
20 Artikel
BenutzerIn
Hallo zusammen, da ich erst seit ein paar Tagen mit Perl beschäftigt bin, habe ich immer wieder ein paar kleine Probleme:

Hier ein CodeFragment
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

#!C:/Perl/bin/perl.exe -w #my $type = "Störung"; my $type = "Anfrage"; my $type1 = "Failure"; my $type2 = "Request"; if ($type == "Störung") { $type = $type1; } elsif ($type == "Anfrage") { $type = $type2; } print "$type\n";
ich habe erwartet, dass die print Anweisung mir den Srting Request zurückliefert. Aber ich bekomme nur failure.

wenn $type = "Störung" ist sollte print Anweisung Failure liefert
und wenn $type = "Anfrage" ist sollte print Anweisung Request liefert

aber kommischerweise bekomme ich für die beiden Fälle nur de String Failure zurück. Kann mir jemand sagen wo der Fehler in mein code ist

ich danke euch im Voraus für alle Antworten

mod-edit pq: perl-tags hinzugefügt
Last edited: 2010-07-19 11:33:39 +0200 (CEST)
- +2 replies
- payx
  
  2010-07-19 11:34
  
  User since
  2006-05-04
  564 Artikel
  BenutzerIn
  
  Hallo joelsok,
  
  der Vergleichsoperator für Strings ist eq. Mit == können nur numerische Werte verglichen werden.
  
  HTH
  Grüße
  payx
  
  PS: Bitte setze Deine Code-Fragmente in 'code=perl'-Tags, dann sind sie besser lesbar.
  - joelsok
    
    2010-07-19 11:39
    
    User since
    2010-07-15
    20 Artikel
    BenutzerIn
    
    Danke für die Antwort
- +2 replies
- pq
  
  2010-07-19 11:36
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  bitte mache in zukunft code- oder perl-tags um daten- oder code-schnipsel herum.
  
  == ist ein numerischer vergleich. numerisch ist aber sowohl der string "Anfrage" als auch der string "Störung" gleich 0.
  du möchtest den operator für string-vergleich eq benutzen.
  
  welches perl-buch liest du denn?
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - joelsok
    
    2010-07-19 11:41
    
    User since
    2010-07-15
    20 Artikel
    BenutzerIn
    
    hallo pq,
    ich war nur verwirrt. Jetzt erinnere ich mich , dass ich es in meinem Buch gelesen habe. Wenn man irgentwas sucht und weit weg denk, dann passiert solche unnötige Fehler. Danke schön

View all threads created 2010-07-19 11:30.