Externen String auslesen

[Peter]

Hi nochmal!

Danke für Deine schnelle Antwort.

Um welche Datenmengen handelt es sich denn?

In der Datei sollen zukünftig ca. 100 Einträge zu finden sein.

Ich habe das Skript jetzt so geschrieben, jedoch funzt es immernoch nicht. :-(

open(DATEI,"<muster.csv") || die "Datei nicht gefunden";
while(@zeile = <DATEI>)
{
  $aid = substr($zeile,0,6);
  $mid = substr($zeile,8,6);
  print "A-ID: $aid, M-ID: $mid<br>";
  my @entries = split( /;/ ,$zeile);
  print "URL: $entries[5]";
}
close(DATEI);

Was hab ich falsch gemacht?