Select Code to Download

# Untested code, not for production use
# see "hard-to-debug trouble"
...
  bless $self, $package;
  $self;
};

package Master::Object;
...
# set a new master object:
my $new_master = Master::Object->create_a_new_object();
$main->($new_master);