1package DJabberd::Stats;
2use strict;
3use warnings;
4
5# last 50,000 on_stanza_received latency numbers.  (from SAXHandler)
6our $latency_max_size = 50_000;
7our $latency_log_max_size = 10;
8our $latency_index    = 0;
9our $latency_log_index    = 0;
10our @stanza_process_latency = ();
11our @stanza_process_latency_log = ();
12our $latency_log_threshold = 0.005;
13
14our %counter = ();
15
16
171;
18