Help for this page
package My::Module; ... } 1;
BEGIN { open $::fh, '>>', '/var/foo.log'; } use My::Module $::fh;