sub enqueue
{
    my $class = shift;
    my $self = { };
    bless ($self, $class);

    #    
    # collect identify information about the client,
    # i.e. IP ==> ???
    #
    # then start working
    #

    return $self;
}