|
Lines 109-114
sub get_trusted_proxies {
Link Here
|
| 109 |
my @trusted_proxies_ip = split( / /, $proxies_conf ); |
109 |
my @trusted_proxies_ip = split( / /, $proxies_conf ); |
| 110 |
my @trusted_proxies = (); |
110 |
my @trusted_proxies = (); |
| 111 |
foreach my $ip (@trusted_proxies_ip){ |
111 |
foreach my $ip (@trusted_proxies_ip){ |
|
|
112 |
local $Net::Netmask::SHORTNET_DEFAULT = 1; |
| 112 |
my $mask = Net::Netmask->new2($ip); |
113 |
my $mask = Net::Netmask->new2($ip); |
| 113 |
if ($mask){ |
114 |
if ($mask){ |
| 114 |
push(@trusted_proxies,$mask); |
115 |
push(@trusted_proxies,$mask); |