if abfragen für array (gelöst) (Allgemeines zu Perl)

[thread]17387[/thread]

if abfragen für array [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 17

Articles: hide open all | hide show old branches

+3 replies
toldap

2012-05-04 12:23

User since
2010-04-06
5 Artikel
BenutzerIn

Hallo an Alle!

Erstmal herzlichsten Dank für dieses Forum hier. Mir wurde schon etliche male geholfen. Jetzt habe ich aber eine Frage, für welche ich noch keine Antwort gefunden habe. Wie ist es möglich verschiedene Elemente in einem Array in einer einfach if abfrage abzufragen? Zur Vereinfachung;

@TEST = (1 .. 10);

if ("alle Elemtente in Array TEST" eq "1"){
}

ohne dass ich folgendes machen muss;

if (1 eq "1" and 2 eq "1" and 3 eq "1" ... ) {
}

Danke!
- +2 replies
- pq
  
  2012-05-04 12:31
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  bitte keine doppelposts.
  
  du willst prüfen, ob alle elemente deines arrays 1 sind?
  
  benutz doch einfach List::MoreUtils
  
  print "All items 1" if all { $_ == 1 } @list;
  
  ansonsten kannst du noch ein grep selber bauen, ist aber ineffizienter, weil es immer alle elemente durchgeht, im gegensatz zu all().
  
  der eigentliche algorithmus wäre eine schleife, die du mit last verlässt, sobald ein unerwünschtes element auftaucht. all() ist eben nur eine hübsche perlische variante davon.
  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
  - toldap
    
    2012-05-04 14:01
    
    User since
    2010-04-06
    5 Artikel
    BenutzerIn
    
    Hi pq
    
    Vielen Dank für die Antwort. Funktioniert super!

View all threads created 2012-05-04 12:23.