my $fh; BEGIN { open $fh, '>>', '/var/foo.log' or die; } use My::Module $fh; #### use My::Module do { open my $fh, '>>', '/var/foo.log' or die; $fh };