use Test::More qw(no_plan);

BEGIN { require_ok( 'App::RecordStream::OptionalRequire' ) };

$App::RecordStream::OptionalRequire::PRINT_WARNING = 0;

my $dne = "No::Such::Module::Random" . int(rand(1_000_000));
my $loaded = App::RecordStream::OptionalRequire::optional_use($dne);
is($loaded, 0, "Test nonexistant module load of $dne");

$loaded = App::RecordStream::OptionalRequire::optional_use(qw(App::RecordStream::Operation));
is($loaded, 1, 'Test existing module load');

$loaded = App::RecordStream::OptionalRequire::optional_use(qw(JSON::MaybeXS));
is($loaded, 1, 'Test external module with extra args');

my $json = JSON::MaybeXS->new;
my $hash = $json->decode('{"foo": "bar"}');
is($hash->{'foo'}, 'bar', "Test using loaded method");