Splitting perl module into multiple files

Question

I'm a perl newbie who is working on a module that is getting quite long and I want to split it into multiple files for easier maintainability and organization. Right now it looks something like this

#ABC.pm
package ABC;

use strict;
use warnings;

my $var1;
my $var2;

sub func1 {
    #some operations on a $var
}

sub func2 {
    #some operations on a $var
}

return 1;

I'd like it to look something like

#ABC_Part_1.pm
package ABC;

use strict;
use warnings;

my $var1;
my $var2;

sub func1 {
    #some operations on a $var
}

return 1;

---

#ABC_Part_2.pm
package ABC;

use strict;
use warnings;

sub func2 {
    #some operations on a $var
}

return 1;

The issue I'm having is getting the variables to be seen across the separate files. I tried to declare them using 'our', but then I have to use the scope resolution operator which I don't want to do. I'd like to treat them as local variables within the module files, but have them hidden to the calling script. I'd also like to only have one include in the calling script, like

#!/usr/bin/env perl
#script.pl

use strict;
use warnings;
use ABC;

func1();
func2();

Thanks

Answer 1

The issue I'm having is getting the variables to be seen across the separate files.

Your best option is to stop wanting that.

The whole point of lexical variables is for them to be accessible in only a small locally visible bit of code. A variable that needs to be accessed from multiple different files is a sign of "code smell".

If you're really sure you want this though…

I tried to declare them using 'our', but then I have to use the scope resolution operator which I don't want to do.

Yes, this should work, but you need to declare the variable at the top of each file you use it in.

# ABC_part_1.pm
package ABC;
our $foo;

# code that accesses $foo goes here

1;

And then:

# ABC_part_2.pm
package ABC;
our $foo;

# code that accesses $foo goes here

1;