Einlesen von Zahlenfolgen mit anschliessender Weiternutzung - #122508 (Allgemeines zu Perl)

nepos

2009-06-15 16:24

User since
2005-08-17
1420 Artikel
BenutzerIn

Hallo Thomas,

Also, erstmal grundlegend: bitte use strict; und use warnings; in deinen Skripten benutzen. Das erspart dir eine Menge Ärger.

Dann solltest du z.B. nach open() immer den Fehler abfangen:

Code: (dl )

open(my $fh, '<', $file) or die "Error reading file $file: $!";

Nach chop() fehlt das Semikolon.

So, dann in Zeile 17 benutzt du split() komplett falsch. Wenn du am Strichpunkt splitten willst, muss das so aussehen:

Code: (dl )

my @vars = split(/;/, $line);

Zeile 23 und 24: $a und $b sollte man nicht als Variablen benutzen. Generell sind Variablen mit einem Buchstaben nicht sonderlich guter Stil.

Btw, das Skript ist so wie von dir gepostet nicht lauffähig, da syntaktisch falsch!

Wenn du das mit den CSVs sauber machen willst, dann solltest du dir mal auf CPAN mal das Modul CPAN:

Text::CSV ansehen.