#!perl
use strict;
use Test::More (tests => 3);
=head1 test Abstract
tests return vals of import into scalar and list contexts.
=cut
use Data::Dumper::EasyOO (alias => 'EzDD');
my ($r1, $r2);
($r1,$r2) = EzDD->import(indent=>1);
is ($r1, 1, "list context returns 1 in 1st arg");
is (ref $r2, 'HASH', "list context import returns hashref in 2nd arg");
$r1 = EzDD->import(indent=>1, autoprint=>1);
is (ref $r1, 'HASH', "scalar context import returns hashref in 1st arg");
# ezdump ($r1);
__END__