in reply to ip address list

Change 
print "$ip\n";

[download]
to 
print $ip->addr(), "\n";

[download]

In Section Seekers of Perl Wisdom