package Sam::Constants;
my @defaults_all = (... );
sub foo { return Template->new( @_ , @defaults_all, DEFAULTS_foo ) };
sub bar { return Template->new( @_ , @defaults_all, DEFAULTS_bar ) };

... # other file
use Sam::Constants qw/foo/;
my $tt = foo(LOCAL_CFG);
$tt->process();