package My::Module;

our $fh;

sub import {
    shift;              # throw away my own package name
    $fh   = shift;
    #{...}              # check to see it's a good filehandle
}

sub later {
    print $fh 'Arbitrary text.';
}

1;