### Totally/Fake.pm
use strict;

package Totally::Fake;
our @ISA = qw(Exporter);
our ($fake, $faker);
our @EXPORT = qw($fake $faker);

### my_script.pl
use strict;

# uncomment this to make it work
# use lib '/long/path/to/nowhere';

use Totally::Fake;
print $fake;