Hash aus TXT

[Struppi]

sooo bin schon etwas weiter gekommen glaub ich ...

Aber nicht mit unseren Ratschlägen.

Hier mal der Codeteil:

open(PERSO, "text.txt") || die "Datei nicht gefunden";
while(! eof(PERSO)) {
my $nummer = getc(PERSO);
my $nummer2 = getc(PERSO);

Das ist irgendwie kein Perl. getc() holt, wie du auf der Seite die ich dir verlinkt habe vielleicht gelesen hast, nur ein Zeichen, insofern ist dein Ergebnis nur logisch.

$personal{'$nummer'} = $nummer2;

Du weißt was die einfachen Anführungszeichen machen? Im gegensatz zu dopppelten und warum hier überhaupt ein anführungszeichen verwendet wird ist mir nicht klar.

so sehen die einzelnen einträge aus... sollte ich da mit trennzeichen ar beiten?

Welche Trennzeichen? Du hast ja einige Tipps bekommen, leider sind diese nicht bei dir angekommen.

Im Prinzip ist das ganze ein dreizeieler in Perl:

while(<FH>) {  
chomp; # Zeilenumbruch entfernen  
chomp( $hash{$_} = <FH>);  
}  

Damit erzielst du exakt das Ergebnis das du willst, mit den Daten die du uns gezeigt hast.

Struppi.