my $local1 = my_module->new();
$local1->func1();
$local1->func2();

my $local2 = my_module->new();
$local2->func1();
$local2->func2();

package my_module;
use base qw(a_module);
sub func1 { shift->do_something1() }
sub func2 { shift->do_something2() }