tsy+2008-05-19 14:28:49--

Hallo, Forum!
Ich möchte aus einem Array selektiv Daten ausgeben. und zwar sollen in unten stehendem Code die 14 und die 15 weggelassen werden. Ausgegeben wird nichts.

Code (perl): (dl )

1
2
3
4
5
6
7
8
9

@re;
for ($i =0; $i<20; $i++){
        $re[$i]  = $i;
}
print "@re\n";
foreach (@re){
        next if ($_ == 14 || 15 );
        print;
}

Wo liegt mein Denkfehler?

Viele Grüße, tsy

1
2
3
4

@re
for ($i =0; $i<20; $i++){
	$re[$i]  = $i;
}

my @re = 0 .. 19;

next if ($_ == 14 || 15 );

next if ( $_ == 14 ) || 15;

1
2
3
4

for my $i ( 0 .. 19 ) {
    next  if  $i == 14 || $i == 15;
    print "$i\n";
}

1
2
3

for my $i ( 0 .. 13, 16 .. 19 ) {
    print "$i\n";
}

sid burn+2008-05-19 14:44:01--

hmm, das ist
1) häßlich
2) fehleranfällig
3) du nutzt anscheind kein "use strict";

...

Dein Skript komplett neu geschrieben.

Code: (dl )

1
2
3
4

for my $i ( 0 .. 19 ) {
    next  if  $i == 14 || $i == 15;
    print "$i\n";
}

tsy+2008-05-19 16:43:29--

Wenn etwas nicht funktioniert, dann versuche ich, dem Problem in einem simplen, kleinen Script auf den Grund zu gehen.