package System::Scaller;
use Module::Load qw/ load /;
use Devel::CheckOS qw/ os_is /;
my @targets = (
  [qw/ AIX  System::Scanner::AIX  /],
  [qw/ RHEL System::Scanner::Linux::RHEL  /],
  [qw/ SUSE System::Scanner::Linux::SUSE  /],
);
for my $targ ( @targets ){
    my( $name, $module ) = @_;
    if( os_is( $name ) ){
        load $module;
        @System::Scaller::ISA = $module;
        last;
    }
}

1;