sub funcA {
    my ($self) = @_;

    require "X.pm";
    $self->funcB();
}