Bestimmte Teile eines Arrays durchlaufen - bisher foreach, wie mit for? (Allgemeines zu Perl)

[thread]13615[/thread]

Bestimmte Teile eines Arrays durchlaufen - bisher foreach, wie mit for?

Leser: 26

Articles: hide open all | hide show old branches

+5 replies
Gast snowmanmh

2009-06-07 13:48

Hallo,

ich durchlaufe bisher ein Array mit foreach, nun möchte ich aber nur eine bestimmte Anzahl von Einträgen de Arrays durchlaufen.

Beispiel:

foreach(@$db)
{
$id = $_->{id};
$dbserv = $_->{dbserv};

....

Ich bekomme das aber mit for bisher nicht hin, da ich nicht weiss, wie ich dann auf die Werte zugreifen muss.

Kann mir jemand einen Tipp geben?
- +2 replies
- GwenDragon
  
  2009-06-07 14:02
  User since
  2005-01-17
  14563 Artikel
  Admin1
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
  
  my @arr = @$db; for (0..3) { $id = $arr[$_]->{id}; $dbserv = $arr[$_]->{dbserv}; } ## oder # C-like for (my @arr = @$db, my $i=0; $i<=3; $i++) { $id = $arr[$_]->{id}; $dbserv = $arr[$_]->{dbserv}; } ## oder # als Array-Splice for (@$db[0..3]) { $id = $_->{id}; $dbserv = $_->{dbserv}; }
  
  Ungetestet. ;)
  Last edited: 2009-06-07 14:05:39 +0200 (CEST)
  die Drachin, Gwendolyn
  
  Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
  - Taulmarill
    
    2009-06-07 14:52
    User since
    2004-02-19
    1750 Artikel
    BenutzerIn
    
    Warum den Array kopieren? Folgendes müsste doch auch gehen:
    
    Code (perl): (dl )
    
    1 2 3 4
    
    for (0..3) { $id = $db->[$_]->{id}; $dbserv = $db->[$_]->{dbserv}; }
    
    $_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78 0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0 F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B
- +2 replies
- bloonix
  
  2009-06-07 14:50
  User since
  2005-12-17
  1615 Artikel
  HausmeisterIn
  Hallo snowmanmh,
  
  nur so am Rande... zwischen for und foreach gibt es keinen Unterschied,
  ausser vielleicht einigen Schönheitsidealen :-)
  
  Code: (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12
  
  for (my $i=1; $i<=3; $i++) { print $i } foreach (my $i=1; $i<=3; $i++) { print $i } my @array = (1..3); for (@array) { print } foreach (@array) { print } my %hash = (1,1,2,2,3,3); for (sort keys %hash) { print } foreach (sort keys %hash) { print }
  
  What is a good module? That's hard to say.
  What is good code? That's also hard to say.
  One man's Thing of Beauty is another's man's Evil Hack.
  - LanX-
    
    2009-06-07 21:33
    
    User since
    2008-07-15
    1000 Artikel
    BenutzerIn
    
    mit for meint der OP wohl c-style, die Namensgebung ist ja auch verwirrend.
    Last edited: 2009-06-07 22:12:05 +0200 (CEST)
    me and my writeups

View all threads created 2009-06-07 13:48.