Lines 106-112
sub get_trusted_proxies {
Link Here
|
106 |
my $proxies_conf = C4::Context->config('koha_trusted_proxies'); |
106 |
my $proxies_conf = C4::Context->config('koha_trusted_proxies'); |
107 |
return unless $proxies_conf; |
107 |
return unless $proxies_conf; |
108 |
my @trusted_proxies_ip = split( / /, $proxies_conf ); |
108 |
my @trusted_proxies_ip = split( / /, $proxies_conf ); |
109 |
my @trusted_proxies = map { Net::Netmask->new($_) } @trusted_proxies_ip; |
109 |
my @trusted_proxies = (); |
|
|
110 |
foreach my $ip (@trusted_proxies_ip){ |
111 |
my $mask = Net::Netmask->new2($ip); |
112 |
if ($mask){ |
113 |
push(@trusted_proxies,$mask); |
114 |
} |
115 |
else { |
116 |
warn "$Net::Netmask::error"; |
117 |
} |
118 |
} |
110 |
return \@trusted_proxies; |
119 |
return \@trusted_proxies; |
111 |
} |
120 |
} |
112 |
|
121 |
|
113 |
- |
|
|