sub new_worker { ## Constructor.
    my $invocant = shift;
    # my $class = ref($invocant);
    my $self = {
    name   => "Jhon Do",
    age    => 32,
    @_ ,
    }; 
    bless $self, $invocant;
    return $self;
};