Wieso bei Formularen, aber nicht bei Dateien ??

[Eckhart]

Ich habe ziemlich erfolgreich das in SELFHTML vorgestellte Beispiel um Formulardaten zu "entschlüsseln" und trennen nach feldern genutzt. Nun wollte ich das gleiche mit einer datei machen mit folgendem inhalt:

,ich.ich.xval.yval,ich.ich.xval.yval

Ich öffne also die datei folgendermassen:

open(DATABASE2, "<DATABASEA.DNB");    
while(<DATABASE2>)
{
  Input = $_ ;
}
close(DATABASE2);

Danach versuche ich den Dateiinhalt, wie bei formulardaten, zuerst nach komma in "felder" zu trennen, und danach in einzelne Werte, mit dem unterschied, dass ich anstatt zwei, vier verschiedene Werte brauche. Ich schreibe also das folgende:

@Datenfelder = split(/,/, $Input);
foreach $Feld (@Datenfelder)  
{
  ($User, $Password, $xvalue, $yvalue) = split(/./, $Feld);
  $Data[$t] = $User;  
  $t = $t + 1;
  $Data[$t] = $Password;  
  $t = $t + 1;
  $Data[$t] = $xvalue;  
  $t = $t + 1;
  $Data[$t] = $yvalue;  
  $t = $t + 1;
}

Aber nach dem aufrufen dieser funktion, ist weder $Data noch ein bestandteil davon (zB. Data[3]) existent. Wieso funktioniert das nicht ?