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> ) { ...
In Section
Seekers of Perl Wisdom