sub parent {
    my $self = shift;

    $some_queue->enqueue( $new_task);
}

sub update_status_event{
    my $status = shift;

    # do something with status
    #...
}