http://www.perlmonks.org?node_id=1016796


in reply to help with error 'readline() on unopened filehandle'

You need to open the file $filename before you can read it. I suspect you wanted to do somethings like ...
open( MYFILE, "<$filename") or die ... ... while ( my $line = <MYFILE> ) { ...