Select Code to Download

    my $tt = Template->new(
        {
...
        }
    ) || die "$Template::ERROR\n";
    $tt->process( $email_args{text_template},

package Sam::Constants;
use Template;
...
            VARIABLES => { ... },
        }
    ) || die "$Template::ERROR\n";

package Sam::Constants;
my @defaults_all = (... );
...
use Sam::Constants qw/foo/;
my $tt = foo(LOCAL_CFG);
$tt->process();