# BaseClass.pm
package BaseClass;
use Moose;

sub get_subclass_object {
    return SubClass->new;
}
1;