It's also usually a good idea to put a BEGIN { ... } block around the module's inlined code...

Try to run the following demo snippet without the BEGIN block to see why:

#!/usr/bin/perl

use strict;
use warnings;
Some::Module->import qw(foo);  # instead of "use Some::Module qw(foo);
+"

my $var = "foo";

print foo(),"\n";

# --- inlined module ---
BEGIN {
package Some::Module;

use strict;
use warnings;
use Exporter "import";
our @EXPORT_OK = qw(foo);

my $var = "init-value";

sub foo {
    return $var;
}

} # end of BEGIN
[download]