hi,

ich hatte dir hier open(my $var,... vs open(IN,... nahegelegt, eins der tutorials auf http://perl-tutorial.org/ zu lesen.

jetzt sehe ich, dass du das offensichtlich nicht beherzigt hast. du benutzt keine my-variablen, kein strict, kein warnings, keine lexikalischen filehandles, du prüfst den erfolg des open() nicht.

das mit den tutorials ist keine blöde schikane für anfänger oder so.
wenn du dir das programmieren *einfacher* machen willst, solltest du die ratschläge beherzigen. ohne diese ganzen sachen wirst du viel mehr zeit mit debugging verbringen als dir lieb ist.
arbeite ein tutorial durch. es ist kostenlos! es kostet dich nur etwas zeit, die du später sparst. ich verstehe immer nicht, wie man darauf verzichtet, kostenlose empfohlene tutorials zu lesen. früher wurden noch mehr bücher empfohlen, da konnte ich dann das argument "hab kein geld" noch halbwegs nachvollziehen.