package main ;
use strict ;
use warnings ;
use MCE::Shared ;
use Data::Dumper ;

my $foo = new Foo ;
my $bar = new Bar( $foo ) ;

# my $barShared = MCE::Shared->share( { module => 'Bar' }, $foo ) ;
# or
# from examples: my $ob = MCE::Shared->share( $blessed_object );
my $barSh = MCE::Shared->share( Bar->new( $foo ) ) ;
print Dumper( $barSh->export ) . "\n" ;
$barSh->task( 'Bar' ) ; # OK
$barSh->{ nestedFoo }->task( 'Foo' ) ; # Not a HASH reference
# Program died here
$barSh->export->{ nestedFoo }->task( 'Foo' ) ; # OK, but not shared?
__END__
$VAR1 = bless( {
                 '_var' => 1,
                 'nestedFoo' => bless( {
                                         '_var' => 1
                                       }, 'Foo' )
               }, 'Bar' );

Starting task Bar for Bar
Not a HASH reference at testHobo3.pl line 60, <__ANONIO__> line 1.
Finished task Bar for Bar