C:\Perl\community\studium>fileh.pl
readline() on closed filehandle FH at C:\Perl\community\studium\fileh.pl line 8.