… | … | ||
---|---|---|---|
7 | use Socket; | 7 | use Socket; |
8 | use AnyEvent::Socket; | 8 | use AnyEvent::Socket; |
9 | 9 | ||
10 | CONF BIND_ADDRESSES = [[undef, 13327]]; | 10 | CONF BIND_ADDRESSES = [[undef, 13327]]; |
11 | 11 | ||
12 | our $MAX_DETECT = 16; # how many bytes to raed to identify the protocol | 12 | our $MAX_DETECT = 32; # how many bytes to read to identify the protocol |
13 | 13 | ||
14 | our @LISTENERS; | 14 | our @LISTENERS; |
15 | 15 | ||
16 | sub flash_policy_server { | 16 | sub flash_policy_server { |
17 | my ($fh) = @_; | 17 | my ($fh) = @_; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |