[quote=thc,04.02.2004, 11:47]ich habe eine Schleife mit do gebaut until auf 'x' gestetzt,
[/quote]
??

Quote

[CODE]

schön, schön, aber das end-tag heisst [ /code] und nicht [CODE END].
das würde es uns erheblich leichter machen, den code zu lesen. aber wie dem auch sei...

Quote

open (hear,">$file");

interessiert es dich nicht, ob das open klappt oder nicht?
ausserdem schreibt man filehandles per konvention gross.
open (HEAR,">$file") or die $!;

Quote

chop ($mp = <>);

warum nimmst du nicht chomp anstatt chop? du solltest ausserdem strict
benutzen und deine variablen mit my() deklarieren:
chomp(my $mp = <>);

Quote

@hear = "@hear/$mp\";

?? was soll das denn sein? du hast ein array, aber du bearbeitest immer
nur genau ein element, nämlich das erste. warum nimmst du nicht die
funktion push()?
push @hear, $mp;
und ausserdem ist '@hear = "@hear/$mp\";' nicht das, was
du vermutest. warum schreibst du einen backslash vor das letzte
anführungszeichen?\n\n

<!--EDIT|pq|1075892908-->