CSV-Dateien in .txt - #63885 (Allgemeines zu Perl)

FIFO

2006-03-20 00:37

User since
2005-06-01
469 Artikel
BenutzerIn

user image

Hm, etwas "zu Fuß" gedacht, der Code ...
Was jedenfalls so nicht funktioniert, ist der Zugriff auf die Array-Elemente:

Code: (dl )

 if(!-e @csv_dateien[$zaehl] . ".txt")    # falsch

... und weiter unten genauso ("@zeilen[$i]...").
Ein Array-Element ist ein Skalar, du musst $csv_dateien[$zaehl] verwenden.
Außerdem solltest du dich mal mit der for-Schleifensyntax befassen, dann kannst du die manuelle Zählerkontrolle einsparen:

Code: (dl )

for my $zeile (@zeilen) {
    # was jetzt in $zeile steht, entspricht dem,
    # was du mit @zeilen[$i] meinst
}

... und dann gibts noch Vereinfachungen, die die Lesbarkeit erhöhen, z.B.

Code: (dl )

while(<DATEN>)
{
    push(@zeilen,$_);
}

# ist dasselbe wie:

my @zeilen = <DATEN>;

Generell: 'use strict; use warnings;' am Anfang hat schon so manchen gerettet ;-)

Good Luck!

Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"