my $bob = Manager->new_worker(name   => "Bob",
                   age => 40);
print $bob,"\n";
# Worker=HASH(0x15debec)