use List::AllUtils qw(max);
if (defined $ENV{REMOTE_ADDR} and $ENV{REMOTE_ADDR} =~ /(?:218\.175\.56\.14|64\.126\
-.93\.93|72\.17\.168\.57|208\.138\.29\.104|66\.63\.250\.28)/) {
+.93\.93|72\.17\.168\.57|208\.138\.29\.104|66\.63\.250\.28|71\.70\.91\.207)/) {
print "Content-Type: text/html\n\nGo away.";
sleep(5);
exit 0;
};
if (defined $ENV{REMOTE_ADDR} and $ENV{REMOTE_ADDR} =~ /(?:218\.175\.56\.14|64\.126\
-.93\.93|72\.17\.168\.57|208\.138\.29\.104|66\.63\.250\.28)/) {
+.93\.93|72\.17\.168\.57|208\.138\.29\.104|66\.63\.250\.28|71\.70\.91\.207)/) {
sleep(5);
print "Content-Type: text/html\n\nGo away.";
exit 0;