Thread Wert aus Zeile auslesen in Abhängigkeit von einem Wert der Zeile darüber? (6 answers)
Opened by cybermaid at 2011-03-10 23:08

pktm
 2011-03-11 00:22
#146375 #146375
User since
2003-08-07
2921 Artikel
BenutzerIn
[Homepage]
user image
Hallo cybermaid!

So für den Anfang würde ich Dir dringend anraten, deinen Code einfach einzurücken.
Immer, wenn du einen Code-Block auf machst ( öffnende geschweifte Klammer { ) rückst du alles nachfolgende um einen Tabulator ein. Immer wenn du eine geschweifte Klammer zu machst, machst du einen Tabulator weniger.

Dann siehst du auch die Fehler in deinem Code, z.B. dass deine Anweisungen außerhalb der Schleifen liegen und deine Abfragen deshalb nie so ausgeführt werden können, wie du Dir das vorstellst.

Und der nächste Schritt wäre dann, mit strict und warnings zu arbeiten.

Hier mal ein Beispielcode, der etwas ähnliches macht (ungetestet, aber um Welten lesbarer und verständlicher):
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
#!perl

use strict;
use warnings;

my @zeilen = (qw/a c b f g rt d/);

my $vorherige_zeile = '';
foreach my $aktuelle_zeile ( @zeilen ) {
    chomp($aktuelle_zeile);
    if( $aktuelle_zeile eq 'rt' and $vorherige_zeile eq 'g' ) {
        print "$vorherige_zeile stand vor $aktuelle_zeile\n";
        last;
    }

    # -- letzte Zeile merken
    $vorherige_zeile = $aktuelle_zeile;
}


Grüße, pktm
http://www.intergastro-service.de (mein erstes CMS :) )

View full thread Wert aus Zeile auslesen in Abhängigkeit von einem Wert der Zeile darüber?