in reply to how to pass filehandle between module ?

Use references to filehandle instead filehandles: 
open my $f, ">", $filename;

[download]
see Indirect filehandles in perlopentut

In Section Seekers of Perl Wisdom