Help for this page

Select Code to Download

Select or download this

use Socket;

...

print "Unique items:\n";
print "$hash{$_}\n" for keys %hash;