Select Code to Download

use strict;
use warnings;
use 5.010;
...

say 'Dumper new object:       ',Dumper(\$other_foo);
say $other_foo->isa('Foo') ? 'I am a Foo!' : 'I do not know what I am.
+';

Dumper original object: $VAR1 = \bless( {
                   'bar' => 'barValue',
                   'foo' => 'fooValue'
...
                 }, 'Foo' );

I am a Foo!