use Module::Load;

my $state = 'TX';
my $module = 'State::' . $state . '::formulas';
eval {
    load $module;
} or do {
    my $err = $@;
    ...
};