Select Code to Download

my $obj = Win32::Event2Log->new(engine => 'type');

use 'base' Win32::Event2Log::Engine;
...

    return $self->select_engine($self->{engine}); 
}

use Win32::Event2Log::Reader;
use Win32::Event2Log::Wevtutil;
...

    $engines{$engine}->();
}