Help for this page

Select Code to Download

Select or download this

push(my @array, $lanip) if ! $seen{$lanip}++;
#print "@array\n";
my %hash   = map { $_, 1 } @array;
 my @unique = keys %hash;
print "@unique\n";

Select or download this
```
192.169.30.0

...
```