# file Classone.pm
package Classone;
sub new { }
1;

# file Classtwo.pm
package Classtwo;
sub new { }
sub a_method {
    Classone->new;
    Classtwo->new;
}
1;