package modul_test
...
sub new {
        my $classname = shift;
        my $params = shift;
        bless($self, $classname);

        # hier funktioniert es
        my $name = 'foo::bar';
        my $modul = new {$name}(...);

        return $self;
        } # sub new

sub test {
        # hier funktioniert es nicht: syntax error at /..., near "}("
        my $name = 'foo::bar';
        my $modul = new {$name}(...);

        # nur hier
        my $modul = new foo::bar(...);

        } # sub test