Logischer Operator || bzw. or (gelöst) (Allgemeines zu Perl)

[thread]15113[/thread]

Logischer Operator || bzw. or [gelöst]

Leser: 22

Articles: hide open all | hide show old branches

+5 replies
PETER_PAN2009

2010-06-08 13:25
User since
2009-08-24
111 Artikel
BenutzerIn
Hallo zusammen!

Ich möchte ganz gerne in einer Schleife zwei Werte abfragen.
Code: (dl )

1 2 3 4 5

unless(not $data_1 =~ m/$regex/gismx || not $data_2 =~ m/$regex/gismx ){ print "RICHTIG\n"; }else{ print "FALSCH\n"; }
Wenn der erste Ausdruck wahr ist, wird er zweite gar nicht beachtet. Ich könnte das Ganze natürlich mit zwei Schleifen erledigen, wollte aber fragen ob es in PERL noch eleganter zu implementieren geht??

Vielen Dank
Gruß
Peter
- esskar
  
  2010-06-08 13:33
  User since
  2003-08-04
  7321 Artikel
  ModeratorIn
  Code (perl): (dl )
  
  1 2 3
  
  if($data_1 =~ m/$regex/gismx || $data_2 =~ m/$regex/gismx ) { }
  
  ?
- +2 replies
- topeg
  
  2010-06-08 13:36
  User since
  2006-07-10
  2611 Artikel
  BenutzerIn
  Code (perl): (dl )
  
  if($data_1 =~ m/$regex/gismx && $data_2 =~ m/$regex/gismx )
  
  Oder willst du immer die Regexp auf beide Variablen anwenden?
  
  Code (perl): (dl )
  
  1 2 3
  
  my $d1=$data_1 =~ m/$regex/gismx; my $d2=$data_2 =~ m/$regex/gismx; if($d1 && $d2 )
  - PETER_PAN2009
    
    2010-06-08 13:41
    User since
    2009-08-24
    111 Artikel
    BenutzerIn
    
    Denkfehler von mir...genau das wollte ich erreichen topeq :-)
    
    Code: (dl )
    
    if($data_1 =~ m/$regex/gismx && $data_2 =~ m/$regex/gismx )
    
    Danke euch beiden!
    
    Gruß
    Peter
    
    ps. Ich finde dieses Forum einfach nur Klasse, hier wird einem unglaublich schnell und konstruktiv geholfen, weiter so!!!
- pq
  
  2010-06-08 14:34
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  hierzu ne kurze anmerkung: unless ist toll für kurze abfragen. "unless (not ...)" finde ich persönlich ganz schlecht verständlich. doppelte verneinung.
  ich habe mir angewöhnt, sobald ich mehr als eine bedingung habe oder sie mit not verknüpfe, mache ich aus einem unless ein if.
  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

View all threads created 2010-06-08 13:25.