##
use Modern::Perl;
use Testing;
use Data::Dump qw/dump/;
my $object = Testing->new;
say dump($object);
####
bless({ thing => bless(do{\(my $o = 39557684)}, "Bit::Vector") }, "Testing")
####
my $object = Testing->new({thing => undef});