sub get_subclass_object {
    my $class = ref $_[0];
    return $class->new;
}