package MonkeyMan::CloudStack::Element;
use strict;
use warnings;
use Moose::Role;
use namespace::autoclean;
with 'MonkeyMan::ErrorHandling';
# ^^^ by the way, the role consumes one more role, but it doesn't generate any warnings
# <...>
sub find_related_to_me {
# <...>
my $quasi_object = eval {
require "MonkeyMan//CloudStack//Elements//$module_name.pm";
return("MonkeyMan::CloudStack::Elements::$module_name"->new(mm => $mm));
};
# <...>
}
# <...>
1;
####
package MonkeyMan::CloudStack::Elements::Domain;
use strict;
use warnings;
use MonkeyMan::Constants;
use Moose;
use MooseX::UndefTolerant;
use namespace::autoclean;
with 'MonkeyMan::CloudStack::Element';
sub element_type {
# <...>
}
sub _load_full_list_command {
# <...>
}
sub _generate_xpath_query {
# <...>
}
1;
####
package MonkeyMan::CloudStack::Elements::VirtualMachine;
use strict;
use warnings;
use MonkeyMan::Constants;
use Moose;
use MooseX::UndefTolerant;
use namespace::autoclean;
with 'MonkeyMan::CloudStack::Element';
sub element_type {
# <...>
}
sub _load_full_list_command {
# <...>
}
sub _generate_xpath_query {
# <...>
}
1;
####
Subroutine element_type redefined at /opt/monkeyman-0.2.x/bin/../lib/MonkeyMan//CloudStack//Elements//VirtualMachine.pm line 17.
Subroutine _load_full_list_command redefined at /opt/monkeyman-0.2.x/bin/../lib/MonkeyMan//CloudStack//Elements//VirtualMachine.pm line 23.
Subroutine _generate_xpath_query redefined at /opt/monkeyman-0.2.x/bin/../lib/MonkeyMan//CloudStack//Elements//VirtualMachine.pm line 30.