ach du meine güte.

erstens: wenn du den artikel über strict gelesen hast, solltest du wissen, dass man eine variable nicht irgendwo am anfang deklarieren muss, nur um sie ein irgendeiner schleife zu benutzen. warum nicht einfach foreach my $h (@h)

zweitens: deine variablennamen lassen schwer zu wünschen übrig (wie ich auch schon erwähnt hatte). es bringt nichts, heute zeit zu sparen, indem man variablen einen buchstaben als namen gibt und dann morgen nicht mehr zu wissen, was mit der variable gemeint ist.

drittens: wenn du sowieso den kompletten inhalt der datei in das feld schreiben willst, wieso liest du die datei zeilenweise ein und wieso glaubst du, dass ein immer erneutes setzen des wertes den neuen wert nur anhängt anstatt zu uberschreiben?
wenn du $x = 23; $x = 24 sagst, ist $x am schluss eben 24 und nicht 2324 oder 47 oder so etwas.


fertig.
für die zukunft empfehle ich im übrigen: WasIsteinLexikalischerFileHandle