alive results from the CPAN

Porttracker/protocol.pod view on Meta::CPAN

Alternatively, the server also listens on the Unix socket
F</tmp/.tawny/.tawnyd> for local connections (where "none" is one of the
guaranteed auth methods).

There are currently no timeouts for the connection itself, but TCP
keepalive might be enabled server-side.

=head2 PACKAGE ENCAPSULATION LAYER

The protocol is based on sending and receiving JSON arrays encoded as
UTF-8. The server expects JSON arrays to be sent back-to-back, without any

view all matches for this distribution

AnyEvent-Proc

2 results

            exit       => delete $options{on_exit},
            ttl_exceed => delete $options{on_ttl_exceed},
        },
        eol     => "\n",
        cv      => $cv,
        alive   => 1,
        waiter  => $waiter,
        waiters => {
            in  => [],
            out => [],
            err => [],


    if ( $options{ttl} ) {
        $self->{timer} = AnyEvent->timer(
            after => delete $options{ttl},
            cb    => sub {
                return unless $self->alive;
                $self->kill;
                $self->_emit('ttl_exceed');
            }
        );
    }


    $waiter->begin;
    $cv->cb(
        sub {
            $self->{status} = shift->recv;
            $self->{alive}  = 0;
            undef $self->{timer};
            $waiter->end;
            $self->_emit( exit => $self->{status} );
        }
    );

    my $time   = pop;
    my $signal = uc( pop || 'TERM' );
    my $w      = AnyEvent->timer(
        after => $time,
        cb    => sub {
            return unless $self->alive;
            $self->kill;
        }
    );
    $self->fire($signal);
    if ($cb) {

        undef $w;
        return $exit;
    }
}

sub alive {
    my $self = shift;
    return 0 unless $self->{alive};
    $self->fire(0) ? 1 : 0;
}

sub wait {
    my ( $self, $cb ) = @_;


See L</wait> for the meaning of the callback parameter and return value.

Without calllback, this is a synchronous call. After this call, the subprocess can be considered to be dead. Returns the exit code of the subprocess.

=head2 alive()

Check whether is subprocess is still alive. Returns I<1> or I<0>

In fact, the method equals to

	$proc->fire(0)

view all matches for this distribution

AnyEvent-ProcessPool

1 match

lib/AnyEvent/ProcessPool.pm view on Meta::CPAN

      foreach my $cv (values %{$self->{pending}}) {
        $cv->croak('AnyEvent::ProcessPool destroyed with pending tasks remaining');
      }
    }

    # Terminate any workers still alive
    if (ref $self->{pool}) {
      foreach my $worker (@{$self->{pool}}) {
        $worker->stop if $worker;
      }
    }

view all matches for this distribution

AnyEvent-RabbitMQ-Fork

1 match

lib/AnyEvent/RabbitMQ/Fork/Worker.pm view on Meta::CPAN

    };

    # our callback to be used by AE::RMQ
    weaken(my $wself = $self);
    return sub {
        $guard if 0;    # keepalive

        $wself->clear_connection if $should_clear_connection;

        my $blessed = blessed($_[0]) || 'UNIVERSAL';
        if ($blessed->isa('AnyEvent::RabbitMQ') or $blessed->isa('AnyEvent::RabbitMQ::Channel')) {

view all matches for this distribution

AnyEvent-Retry

1 match

lib/AnyEvent/Retry.pm view on Meta::CPAN

    my ($self) = @_;

    # we weaken $self here so that if the user does "undef $retry", we
    # DEMOLISH the object and silently discard the results of the
    # running code.  feel free to subclass if want to keep the class
    # alive arbitrarily.
    weaken $self;

    my $success = sub {
        my $result = shift;
        return unless defined $self;

view all matches for this distribution

AnyEvent-STOMP-Client

1 match

lib/AnyEvent/STOMP/Client.pm view on Meta::CPAN


    $self->{subscriptions} = {};

    $self->{handle} = AnyEvent::Handle->new(
        connect => [$self->{host}, $self->{port}],
        keep_alive => 1,
        no_delay => 1,
        on_eof => sub {
            undef $self->{handle};
            $self->{connected} = 0;
            $self->event('TRANSPORT_DISCONNECTED', $self->{host}, $self->{port});

view all matches for this distribution

AnyEvent-STOMP

1 match

lib/AnyEvent/STOMP.pm view on Meta::CPAN


    my $connect_cb;
    $self->{handle} = AnyEvent::Handle->new(
        connect => [ $host, $port ],
        tls => $ssl ? 'connect' : undef,
        keepalive => 1,
        on_prepare => sub { $self->event('prepare', @_); },
        on_connect => sub {
            $self->event('connect', @_);
            $self->send_frame('CONNECT', undef, $connect_headers);
            if ($destination) {

view all matches for this distribution

AnyEvent-SlackBot

1 match

  is=>'rw',
  isa=>Str,
  required=>0,
);

has keep_alive_timeout =>(
  is=>'ro',
  isa=>Int,
  requried=>1,
  default=>15,
);

    }
    $self->stats->{last_connected_on}=time;
    $self->stats->{total_connections}++;
    $self->stats->{last_msg_on}=time;
    $self->{timer}=AnyEvent->timer(
       interval=>$self->keep_alive_timeout,
       after=>$self->keep_alive_timeout,
       cb=>sub {
         my $max_timeout=$self->stats->{last_msg_on} + 3 * $self->keep_alive_timeout;
         if(time < $max_timeout) {
           if(time > $self->stats->{last_msg_on} + $self->keep_alive_timeout) {
	     $self->log_info("sending keep alive to server");
             $connection->send(to_json({
	       id=>$self->next_id,
	       type=>'ping',
	       timestamp=>time,
	     }));

	if($@) {
	    $self->log_error("Failed to parse json body, error was: $@");
	    return $self->handle_reconnect;
	  }
	  if(exists $ref->{type} and $ref->{type} eq 'pong') {
	    $self->log_info("got keep alive response from server");
	  } else {
	    if($self->stats->{running_posts}!=0) {
	      # Don't try to handle unknown commands while we are waiting on a post to go out!
	      push @{$self->unknown_que},[$self,$ref,$data];
	      $self->log_info("HTTP Post response pending.. will hold off on responding to commands until we know if we sent it or not");

        $self->send($msg);
      }
    } else {
      $self->log_error("Failed to reconnect will try again in 15 seconds, error was: $result");
      $self->{timer}=AnyEvent->timer(
        interval=>$self->keep_alive_timeout,
        after=>$self->keep_alive_timeout,
        cb=>sub { $self->handle_reconnect },
      );
    }
  }
}

view all matches for this distribution

AnyEvent-SlackRTM

2 results

        my $conn = $self->{conn} = $client->recv;
        $conn->on( each_message => sub { $self->_handle_incoming(@_) } );
        $conn->on( finish       => sub { $self->_handle_finish(@_) } );

        my $started = localtime;
        $self->{_last_keep_alive} = time;
        $self->{keep_alive}       = AnyEvent->timer(
            after    => 15,
            interval => 15,
            cb       => sub {
                my $id    = $self->{id};
                my $now   = time;
                my $since = $now - $self->{_last_keep_alive};
                if ( $since > 30 ) {
                    # will trigger a finish, which will reconnect
                    # if $self->{closed} is not set.
                    $conn->close;
                }
                elsif ( $since > 10 ) {
                    $self->ping( { keep_alive => $now } );
                }
            },
        );
    } );
}

    catch {
        my $message = $raw->body;
        croak "unable to decode incoming message: $message";
    };

    $self->{_last_keep_alive} = time;

    # Handle errors when they occur
    if ($msg->{error}) {
        $self->_handle_error($conn, $msg);
    }

}

sub _handle_finish {
    my ($self, $conn) = @_;

    # Cancel the keep_alive watchdog
    undef $self->{keep_alive};

    $self->{finished}++;

    $self->_do('finish');


    my $cond = AnyEvent->condvar;
    my $rtm = AnyEvent::SlackRTM->new($access_token);

    my $i = 1;
    my $keep_alive;
    my $counter;
    $rtm->on('hello' => sub {
        print "Ready\n";

        $keep_alive = AnyEvent->timer(interval => 60, cb => sub {
            print "Ping\n";
            $rtm->ping;
        });

        $counter = AnyEvent->timer(interval => 5, cb => sub {


This will establish the WebSocket connection to the Slack RTM service.

You should have registered any events using L</on> before doing this or you may miss some events that arrive immediately.

Sets up a "keep alive" timer,
which triggers every 15 seconds to send a C<ping> message
if there hasn't been any activity in the past 10 seconds.
The C<ping> will trigger a C<pong> response,
so there should be at least one message every 15 seconds.
This will disconnect if no messages have been received in the past 30 seconds;
however, it should trigger an automatic reconnect to keep the connection alive.

=head2 metadata

    method metadata() returns HashRef

view all matches for this distribution

AnyEvent-Stomper

3 results

lib/AnyEvent/Stomper.pm view on Meta::CPAN

The name of a virtual host that the client wishes to connect to.

=item heartbeat => \@heartbeat

Heart-beating can optionally be used to test the healthiness of the underlying
TCP connection and to make sure that the remote end is alive and kicking. The
first number sets interval in milliseconds between outgoing heart-beats to the
STOMP server. C<0> means, that the client will not send heart-beats. The second
number sets interval in milliseconds between incoming heart-beats from the
STOMP server. C<0> means, that the client does not want to receive heart-beats.

view all matches for this distribution

AnyEvent-Subprocess

1 match

t/trivial.t view on Meta::CPAN


$b->current_test( $b->current_test() + 1 );

ok $exit, 'got exit';
is $exit->exit_value, 42, 'exited with "exit 42"';
ok ( ( $end_time - $start_time ) > 1, 'kid was alive for more than a second');

view all matches for this distribution

AnyEvent-Task

5 results

lib/AnyEvent/Task.pm view on Meta::CPAN


Running the server and the client in the same process is technically possible but is highly discouraged since the server will C<fork()> when the client demands a new worker process. In this case, all descriptors in use by the client are duped into th...

Since it's more of a bother than it's worth to run the server and the client in the same process, there is an alternate server constructor, C<AnyEvent::Task::Server::fork_task_server> for when you'd like to fork a dedicated server process. It can be ...

    ## my ($keepalive_pipe, $server_pid) =
    AnyEvent::Task::Server::fork_task_server(
      name => 'hello',
      listen => ['unix/', '/tmp/anyevent-task.socket'],
      interface => sub {
                         return "Hello from PID $$";
                       },
    );

The only differences between this and the regular constructor is that C<fork_task_server> will fork a process which becomes the server and will also install a "keep-alive" pipe between the server and the client. This keep-alive pipe will be used by t...

If C<AnyEvent::Task::Server::fork_task_server> is called in a void context then the reference to this keep-alive pipe is pushed onto C<@AnyEvent::Task::Server::children_sockets>. Otherwise, the keep-alive pipe and the server's PID are returned. Closi...

Since the C<fork_task_server> constructor calls fork and requires using AnyEvent in both the parent and child processes, it is important that you not install any AnyEvent watchers before calling it. The usual caveats about forking AnyEvent processes ...

You should also not call C<fork_task_server> after having started threads since, again, this function calls fork. Forking a threaded process is dangerous because the threads might have userspace data-structures in inconsistent states at the time of t...

view all matches for this distribution

AnyEvent-Twitter-Stream

3 results

    my $method          = delete $args{method};
    my $on_connect      = delete $args{on_connect} || sub { };
    my $on_tweet        = delete $args{on_tweet};
    my $on_error        = delete $args{on_error} || sub { die @_ };
    my $on_eof          = delete $args{on_eof} || sub { };
    my $on_keepalive    = delete $args{on_keepalive} || sub { };
    my $on_delete       = delete $args{on_delete};
    my $on_friends      = delete $args{on_friends};
    my $on_direct_message = delete $args{on_direct_message};
    my $on_event        = delete $args{on_event};
    my $timeout         = delete $args{timeout};

                }else{
                    $on_tweet->($tweet);
                }
            }
            else {
                $on_keepalive->();
            }
        };

        $set_timeout->();

      follow   => join(",", @following_ids), # numeric IDs
      on_tweet => sub {
          my $tweet = shift;
          warn "$tweet->{user}{screen_name}: $tweet->{text}\n";
      },
      on_keepalive => sub {
          warn "ping\n";
      },
      on_delete => sub {
          my ($tweet_id, $user_id) = @_; # callback executed when twitter send a delete notification
          ...


=item B<on_error>

=item B<on_eof>

=item B<on_keepalive>

=item B<on_delete>

Callback to execute when the stream send a delete notification.

view all matches for this distribution

AnyEvent-UWSGI

1 match

      redo if /\G\s*,/gc;
   }
}

#############################################################################
# keepalive/persistent connection cache

# fetch a connection from the keepalive cache
sub ka_fetch($) {
   my $ka_key = shift;

   my $hdl = pop @{ $KA_CACHE{$ka_key} }; # currently we reuse the MOST RECENTLY USED connection
   delete $KA_CACHE{$ka_key}

   $hdr{"content-length"} = length $arg{body}
      if length $arg{body} || $method ne "GET";

   my $idempotent = $IDEMPOTENT{$method};

   # default value for keepalive is true iff the request is for an idempotent method
   my $persistent = exists $arg{persistent} ? !!$arg{persistent} : $idempotent;
   my $keepalive  = exists $arg{keepalive}  ? !!$arg{keepalive}  : !$proxy;
   my $was_persistent; # true if this is actually a recycled connection

   # the key to use in the keepalive cache
   my $ka_key = "$uscheme\x00$uhost\x00$uport\x00$arg{sessionid}";

   $hdr{connection} = ($persistent ? $keepalive ? "keep-alive, " : "" : "close, ") . "Te"; #1.1
   $hdr{te}         = "trailers" unless exists $hdr{te}; #1.1

   my %state = (connect_guard => 1);

   my $ae_error = 595; # connecting

            }
         }

         my $finish = sub { # ($data, $err_status, $err_reason[, $persistent])
            if ($state{handle}) {
               # handle keepalive
               if (
                  $persistent
                  && $_[3]
                  && ($hdr{HTTPVersion} < 1.1
                      ? $hdr{connection} =~ /\bkeep-?alive\b/i
                      : $hdr{connection} !~ /\bclose\b/i)
               ) {
                  ka_store $ka_key, delete $state{handle};
               } else {
                  # no keepalive, destroy the handle
                  $state{handle}->destroy;
               }
            }

            %state = ();

               $_[0]->on_read (sub { });
            }
         }
      };

      # if keepalive is enabled, then the server closing the connection
      # before a response can happen legally - we retry on idempotent methods.
      if ($was_persistent && $idempotent) {
         my $old_eof = $hdl->{on_eof};
         $hdl->{on_eof} = sub {
            _destroy_state %state;

   _get_slot $uhost, sub {
      $state{slot_guard} = shift;

      return unless $state{connect_guard};

      # try to use an existing keepalive connection, but only if we, ourselves, plan
      # on a keepalive request (in theory, this should be a separate config option).
      if ($persistent && $KA_CACHE{$ka_key}) {
         $was_persistent = 1;

         $state{handle} = ka_fetch $ka_key;
         $state{handle}->destroyed

view all matches for this distribution

AnyEvent-UserAgent

2 results

lib/AnyEvent/UserAgent.pm view on Meta::CPAN


has request_timeout    => (is => 'rw', default => sub { 0 });

my @OPTIONS = qw(
	proxy tls_ctx session timeout on_prepare tcp_connect on_header on_body
	want_body_handle persistent keepalive handle_params
);

for my $o (@OPTIONS) {
	has $o => (is => 'rw', default => undef);
}

lib/AnyEvent/UserAgent.pm view on Meta::CPAN


The following attributes are supported and they are all passed as options to the
L<C<AnyEvent::HTTP::http_request>|AnyEvent::HTTP/METHODS> calls made by this
module: C<proxy>, C<tls_ctx>, C<session>, C<timeout>, C<on_prepare>,
C<tcp_connect>, C<on_header>, C<on_body>, C<want_body_handle>, C<persistent>,
C<keepalive>, C<handle_params>.

=head1 METHODS

=head2 new

view all matches for this distribution

AnyEvent-WebService-Notifo

1 match

lib/AnyEvent/WebService/Notifo.pm view on Meta::CPAN

It accepts a hash with parameters. We require a C<cb> parameter. This
must be a coderef or a condvar, that will be called with the response.

In void context, this method returns nothing. In scalar context, it
returns a guard object. If this object goes out of scope, the request is
canceled. So you need to keep this guard object alive until your
callback is called.

See
L<< Protocol::Notifo->send_notification()|Protocol::Notifo/send_notification >>
for list of parameters that this method accepts, and an explanation of

view all matches for this distribution

AnyEvent-WebSocket-Client

1 match

t/anyevent_websocket_connection__destroy_in_callbacks.t view on Meta::CPAN

      $a_conn_weak = $a_conn;
      weaken($a_conn_weak);

      $a_conn_code->($a_conn, $cv_finish);
    }
    ok(defined($a_conn_weak), "a_conn is alive due to the cyclic ref in callback");
    $b_conn->on(finish => sub {
      $cv_finish->end;
    });

    $b_conn_code->($b_conn, $cv_finish);

t/anyevent_websocket_connection__destroy_in_callbacks.t view on Meta::CPAN

  $a_conn->on(finish => sub {
    undef $a_conn; # cyclic ref that breaks when executed.
  });
  $a_conn->on(finish => sub {
    my ($conn) = @_;
    ok defined($conn), "conn is still alive in finish callback";
    $cv_finish->end;
  });
},
sub {
  my ($b_conn) = @_;

t/anyevent_websocket_connection__destroy_in_callbacks.t view on Meta::CPAN

    is $msg->body, "foobar", "message OK (first callback)";
  });
  $a_conn->on(next_message => sub {
    my ($conn, $msg) = @_;
    is $msg->body, "foobar", "message OK (second callback)";
    ok defined($conn), "conn is still alive in second next_message callback";
    $cv_finish->end;
  });
},
sub {
  my ($b_conn) = @_;

t/anyevent_websocket_connection__destroy_in_callbacks.t view on Meta::CPAN

    is $msg->body, "FOOBAR", "message OK (first callback)";
  });
  $a_conn->on(each_message => sub {
    my ($conn, $msg) = @_;
    is $msg->body, "FOOBAR", "message OK (second callback)";
    ok defined($conn), "conn is still alive in second next_message callback";
    $cv_finish->end;
  });
},
sub {
  my ($b_conn) = @_;

view all matches for this distribution

AnyEvent-WebSocket-Server

1 match

t/multiple_connections.t view on Meta::CPAN

    foreach (1 .. $TRY_NUM) {
        my $conn = $client->connect($cconfig->connect_url($port, "/"))->recv;
        push(@conns, $conn);
    }

    is($connection_num, $TRY_NUM, "$TRY_NUM connections are kept alive.");

    foreach my $conn (@conns) {
        $conn->close();
    }

view all matches for this distribution

Apache-ASP

3 results

ASP.pm view on Meta::CPAN

love and support through it all, and without whom none of it
would have been possible.

Other honorable mentions include:

 !! Gregory Youngblood, Thanos Chatziathanassiou, & Tsirkin Evgeny for keeping the flame alive!

 :) Doug MacEachern, for moral support and of course mod_perl
 :) Helmut Zeilinger, Skylos, John Drago, and Warren Young for their help in the community
 :) Randy Kobes, for the win32 binaries, and for always being the epitome of helpfulness
 :) Francesco Pasqualini, for bug fixes with stand alone CGI mode on Win32

view all matches for this distribution

Apache-Admin-Config

1 match

t/httpd.conf-dist view on Meta::CPAN

# libraries it uses) leak memory or other resources.  On most systems, this
# isn't really needed, but a few (such as Solaris) do have notable leaks
# in the libraries. For these platforms, set to something like 10000
# or so; a setting of 0 means unlimited.
#
# NOTE: This value does not include keepalive requests after the initial
#       request per connection. For example, if a child process handles
#       an initial request and 10 subsequent "keptalive" requests, it
#       would only count as 1 request towards this limit.
#
MaxRequestsPerChild 0

#

t/httpd.conf-dist view on Meta::CPAN

#  N.B.: Many of the environment variables associated with the original
#  request will *not* be available to such a script.

#
# The following directives modify normal HTTP response behavior.
# The first directive disables keepalive for Netscape 2.x and browsers that
# spoof it. There are known problems with these browser implementations.
# The second directive is for Microsoft Internet Explorer 4.0b2
# which has a broken HTTP/1.1 implementation and does not properly
# support keepalive when it is used on 301 or 302 (redirect) responses.
#
BrowserMatch "Mozilla/2" nokeepalive
BrowserMatch "MSIE 4\.0b2;" nokeepalive downgrade-1.0 force-response-1.0

#
# The following directive disables HTTP/1.1 responses to browsers which
# are in violation of the HTTP/1.0 spec by not being able to grok a
# basic 1.1 response.

view all matches for this distribution

Apache-AuthenNTLM

6 results

AuthenNTLM.pm view on Meta::CPAN

=head2 PerlSetVar ntlmsemtimeout

This set the timeout value used to wait for the semaphore. The default is two seconds.
It is very small because during the time Apache waits for the semaphore, no other
authentication request can be sent to the windows server. Also Apache::AuthenNTLM
only asks the windows server once per keep-alive connection, this timeout value
should be as small as possible.

=head2 PerlSetVar splitdomainprefix

If set to 1, $self -> map_user ($r) will return "username"

view all matches for this distribution

Apache-AutoIndex

1 match

Changes view on Meta::CPAN

0.03  Fri Jan 22 17:02:34 1999 
	- Uploaded to CPAN!
        - Waiting for bug reports

0.01  Wed Jan 18 14:03:17 1999
	- it's alive!

view all matches for this distribution

Apache-Backhand

1 match

Backhand.pm view on Meta::CPAN

=over 3

=item mtime

Last modification time of this stat structure (the last time we heard from
the server - used to decide if the server is alive)

=item arriba

Speed of the server

view all matches for this distribution

Apache-ConfigParser

6 results

      reference 1-1-2-6 Apache::ConfigParser::Directive=HASH key 'line_number'
         '109'
      reference 1-1-2-6 Apache::ConfigParser::Directive=HASH key 'mother'
         SEEN reference 1-0 Apache::ConfigParser::Directive=HASH
      reference 1-1-2-6 Apache::ConfigParser::Directive=HASH key 'name'
         'keepalive'
      reference 1-1-2-6 Apache::ConfigParser::Directive=HASH key 'orig_value'
         'On'
      reference 1-1-2-6 Apache::ConfigParser::Directive=HASH key 'orig_value_array'
        reference 1-1-2-7-2 ARRAY with 1 elements
        reference 1-1-2-7-2 ARRAY index 0

      reference 1-1-2-7 Apache::ConfigParser::Directive=HASH key 'line_number'
         '116'
      reference 1-1-2-7 Apache::ConfigParser::Directive=HASH key 'mother'
         SEEN reference 1-0 Apache::ConfigParser::Directive=HASH
      reference 1-1-2-7 Apache::ConfigParser::Directive=HASH key 'name'
         'maxkeepaliverequests'
      reference 1-1-2-7 Apache::ConfigParser::Directive=HASH key 'orig_value'
         '100'
      reference 1-1-2-7 Apache::ConfigParser::Directive=HASH key 'orig_value_array'
        reference 1-1-2-8-2 ARRAY with 1 elements
        reference 1-1-2-8-2 ARRAY index 0

      reference 1-1-2-8 Apache::ConfigParser::Directive=HASH key 'line_number'
         '122'
      reference 1-1-2-8 Apache::ConfigParser::Directive=HASH key 'mother'
         SEEN reference 1-0 Apache::ConfigParser::Directive=HASH
      reference 1-1-2-8 Apache::ConfigParser::Directive=HASH key 'name'
         'keepalivetimeout'
      reference 1-1-2-8 Apache::ConfigParser::Directive=HASH key 'orig_value'
         '15'
      reference 1-1-2-8 Apache::ConfigParser::Directive=HASH key 'orig_value_array'
        reference 1-1-2-9-2 ARRAY with 1 elements
        reference 1-1-2-9-2 ARRAY index 0

          reference 1-1-2-124-2-0 Apache::ConfigParser::Directive=HASH key 'mother'
             SEEN reference 1-1-2-123 Apache::ConfigParser::Directive=HASH
          reference 1-1-2-124-2-0 Apache::ConfigParser::Directive=HASH key 'name'
             'browsermatch'
          reference 1-1-2-124-2-0 Apache::ConfigParser::Directive=HASH key 'orig_value'
             '"Mozilla/2" nokeepalive'
          reference 1-1-2-124-2-0 Apache::ConfigParser::Directive=HASH key 'orig_value_array'
            reference 1-1-2-124-2-1-2 ARRAY with 2 elements
            reference 1-1-2-124-2-1-2 ARRAY index 0
               'Mozilla/2'
            reference 1-1-2-124-2-1-2 ARRAY index 1
               'nokeepalive'
          reference 1-1-2-124-2-0 Apache::ConfigParser::Directive=HASH key 'value'
             'Mozilla/2 nokeepalive'
          reference 1-1-2-124-2-0 Apache::ConfigParser::Directive=HASH key 'value_array'
            reference 1-1-2-124-2-1-3 ARRAY with 2 elements
            reference 1-1-2-124-2-1-3 ARRAY index 0
               'Mozilla/2'
            reference 1-1-2-124-2-1-3 ARRAY index 1
               'nokeepalive'
        reference 1-1-2-124-1 ARRAY index 1
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH with 10 keys
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'attributes'
            reference 1-1-2-124-2-2-0 HASH with 0 keys
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'daughters'

          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'mother'
             SEEN reference 1-1-2-123 Apache::ConfigParser::Directive=HASH
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'name'
             'browsermatch'
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'orig_value'
             '"MSIE 4\.0b2;" nokeepalive downgrade-1.0 force-response-1.0'
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'orig_value_array'
            reference 1-1-2-124-2-2-2 ARRAY with 4 elements
            reference 1-1-2-124-2-2-2 ARRAY index 0
               'MSIE 4\.0b2;'
            reference 1-1-2-124-2-2-2 ARRAY index 1
               'nokeepalive'
            reference 1-1-2-124-2-2-2 ARRAY index 2
               'downgrade-1.0'
            reference 1-1-2-124-2-2-2 ARRAY index 3
               'force-response-1.0'
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'value'
             '"MSIE 4\\.0b2;" nokeepalive downgrade-1.0 force-response-1.0'
          reference 1-1-2-124-2-1 Apache::ConfigParser::Directive=HASH key 'value_array'
            reference 1-1-2-124-2-2-3 ARRAY with 4 elements
            reference 1-1-2-124-2-2-3 ARRAY index 0
               'MSIE 4\.0b2;'
            reference 1-1-2-124-2-2-3 ARRAY index 1
               'nokeepalive'
            reference 1-1-2-124-2-2-3 ARRAY index 2
               'downgrade-1.0'
            reference 1-1-2-124-2-2-3 ARRAY index 3
               'force-response-1.0'
        reference 1-1-2-124-1 ARRAY index 2

              reference 1-1-2-137-2-1-2-5 Apache::ConfigParser::Directive=HASH key 'mother'
                 SEEN reference 1-1-2-137-2-0 Apache::ConfigParser::Directive=HASH
              reference 1-1-2-137-2-1-2-5 Apache::ConfigParser::Directive=HASH key 'name'
                 'setenvif'
              reference 1-1-2-137-2-1-2-5 Apache::ConfigParser::Directive=HASH key 'orig_value'
                 'User-Agent ".*MSIE.*" nokeepalive ssl-unclean-shutdown  downgrade-1.0 force-response-1.0'
              reference 1-1-2-137-2-1-2-5 Apache::ConfigParser::Directive=HASH key 'orig_value_array'
                reference 1-1-2-137-2-1-2-6-2 ARRAY with 6 elements
                reference 1-1-2-137-2-1-2-6-2 ARRAY index 0
                   'User-Agent'
                reference 1-1-2-137-2-1-2-6-2 ARRAY index 1
                   '.*MSIE.*'
                reference 1-1-2-137-2-1-2-6-2 ARRAY index 2
                   'nokeepalive'
                reference 1-1-2-137-2-1-2-6-2 ARRAY index 3
                   'ssl-unclean-shutdown'
                reference 1-1-2-137-2-1-2-6-2 ARRAY index 4
                   'downgrade-1.0'
                reference 1-1-2-137-2-1-2-6-2 ARRAY index 5
                   'force-response-1.0'
              reference 1-1-2-137-2-1-2-5 Apache::ConfigParser::Directive=HASH key 'value'
                 'User-Agent .*MSIE.* nokeepalive ssl-unclean-shutdown downgrade-1.0 force-response-1.0'
              reference 1-1-2-137-2-1-2-5 Apache::ConfigParser::Directive=HASH key 'value_array'
                reference 1-1-2-137-2-1-2-6-3 ARRAY with 6 elements
                reference 1-1-2-137-2-1-2-6-3 ARRAY index 0
                   'User-Agent'
                reference 1-1-2-137-2-1-2-6-3 ARRAY index 1
                   '.*MSIE.*'
                reference 1-1-2-137-2-1-2-6-3 ARRAY index 2
                   'nokeepalive'
                reference 1-1-2-137-2-1-2-6-3 ARRAY index 3
                   'ssl-unclean-shutdown'
                reference 1-1-2-137-2-1-2-6-3 ARRAY index 4
                   'downgrade-1.0'
                reference 1-1-2-137-2-1-2-6-3 ARRAY index 5

view all matches for this distribution

Apache-DBILogConfig

3 results

DBILogConfig.pm view on Meta::CPAN

=item b Bytes sent, excluding HTTP headers. In CLF format
        i.e. a '-' rather than a 0 when no bytes are sent.

=item c Connection status when response is completed.
        'X' = connection aborted before the response completed.
        '+' = connection may be kept alive after the response is sent.
        '-' = connection will be closed after the response is sent.
        (not yet supported)

=item e The contents of the environment variable specified by parameter

view all matches for this distribution

Apache-DnsZone

1 match

TODO view on Meta::CPAN


[Won't fix in this version] Move away from using PerlSetVar's
[Won't fix in this version] Javascript to highlight login first field!

[Fixed] does ADD actually check (on submit) wheter the user has any more of that record type left?
[Fixed] Content-Length on all template based pages should be implemented. For allowing keep-alive $r->header_out("Content-Length", length(${$content_ref}));
[Fixed] when there's no records under a record, what does the template engine output? the wrong thing! when you DO have records left it should output the add thing, but if you don't have any records there and no allowed records it should parse RECORD...
[Fixed] all add pages have error handling now
[Fixed] all edit pages have error handling now 
[Fixed] Settings doesn't have a you-typed-something-wrong page yet
[Fixed] if there is an error in user input provide a window for people to enter the data again with fields marked red that needs the data again

view all matches for this distribution

Apache-Dynagzip

1 match

Dynagzip.pm view on Meta::CPAN

	my $r = shift;
	my $result = undef;
	# this is to downgrade to HTTP/1.0 for MSIE requests over SSL
	# works in conjunction with this snippet from httpd.conf:
	# SetEnvIf User-Agent ".*MSIE.*" \
	# nokeepalive ssl-unclean-shutdown \
	# downgrade-1.0 force-response-1.0
	#
	if ( $ENV{'downgrade-1.0'} or $ENV{'force-response-1.0'} ) {
		$result = 0;
	} elsif ($r->protocol =~ /http\/1\.(\d+)/io) {

Dynagzip.pm view on Meta::CPAN

client browser. For the last purpose C<Apache::Dynagzip> handler should be configured as
a standalong handler out of C<Apache::Filter> chain too.

Working over C<HTTP/1.0> this handler indicates the end of data stream by closing connection.
Indeed, over C<HTTP/1.1> the outgoing data is compressed within a chunked outgoing stream,
keeping the connection alive. Resonable control over the chunk-size is provided in this case.

In order to serve better the older web clients,
an C<extra light> compression is provided independently in order to remove
unnecessary leading blank spaces and/or blank lines
from the outgoing web content. This C<extra light> compression could be combined with

Dynagzip.pm view on Meta::CPAN


=item Notes:

The lifetime defined by C<Expires> depends on accuracy of time settings on client machine.
If the client's local clock is running 1 hour back, the cached copy of
the page will be alive 60 minutes longer on that machine.

C<Apache::Dynagzip> never overwrites C<Expires> header set by earlier handler inside the filter-chain.

=back

view all matches for this distribution

Apache-FilteringProxy

1 match

lib/Apache/FilteringProxy.pm view on Meta::CPAN

			# user-agent      - we will set this later
			# accept-encoding - we don't want to get encoded (gzip, compressed)
			#                   content & try to filter it
			# don't need to be kept by a proxy (affect only the immediate
			# connection)
			#     connection, keep-alive, TE, Trailers, Transfer-Encoding,
			#     Upgrade, Proxy-Authenticate, Proxy-Authorization
			if ($name !~ m/^(connection|keep-alive|user-agent|te|trailers|transfer-encoding|accept-encoding|upgrade|proxy-authenticate|proxy-authorization)$/i) {
				$request->header ($name, $value)
			} else {
				$r->warn("ignoring header '$name'='$value'") unless ($Apache::FilteringProxy::logging < 2);
			}
		}

view all matches for this distribution

Apache-HTTunnel

3 results