Select Code to Download

#! perl
use strict;
...

    print 'IPs at location ', $ip, ' are: ', join(', ', @ips), "\n";
}

$VAR1 = {
          '92.123.72' => [
...
        };

IPs at location 92.123.72 are: 92.123.72.112, 92.123.72.0